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ABSTRACT 


A major hardware buy of Zenith microcomputers) and 
peripherals was begun by the U.S. Navy in 1983 to equip 
squadrons, afloat units, and staffs with desktop computer 
capability. This contract provided considerable savings in 
hardware aquisition costs and the potential, with proper 
software, to radically improve the effectiveness of indi- 
vidual commands. This improvement has not been realized in 
many commands, due mainly to a lack of understanding of what 
a computer system is, how to ensure effective applications, 
and how the system should interact beyond the command. This 


study, aimed at the commanding officer, discusses management 


of a microcomputer system. It includes basic microcomputer 
capabilities and limitations, economics considerations, 
program requirements, training, and recommendations for 


enhancing microcomputer effectiveness. 
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The reader is cautioned that computer programs developed 
in this research may not have been exercised for all cases 
of interest. While every effort has been made, within the 
time available, to ensure that the programs are free of 
computational and logic errors, they cannot be considered 
validated. Any application of these programs without addi- 


tional verification is at the risk of the user. 
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MANR ODUSASPOS 


EIE co Ha joint $304mi llenan acquisition program with 
the U.S. Air Force, the U.S. Navy started purchasing the 
Zenith 100 series microcomputer in order to equip all 
commands with a desktop computer. Individual commands were 
given purchase ceilings to acquire the hardware (and soft- 
ware, if still below theim limit), but little formal 
guidance or training was provided. This left each command 
to struggle on its own to best employ the equipment and 
software. In order to get the most out of the microsystem, 
the commanding officer must know what the capabilities and 
limits of the system are and how to manage that resource to 
improve his command readiness. 

It has been said that "Knowledge is Power." The intent 
of this paper is to provide a basic level of knowledge in 
computer systems to mid and upper level management so that 
they may, through understanding, more fully employ the 
microcomputer in the management of their unit. 

In solving a problem it is beneficial to take a systems 
approach in analyzing and thinking about that problem. The 
methodology of the "General System Theory" is discussed in 
Chapter II, and stresses the importance of establishing 
objectives or goals and defining the boundaries of the 
problem at hand as a first step in the solution prosess. 
This is then followed by a discussion of what makes up a 
business computer system. The micro system in this case is 
not just the computer keyboard and screen. Much of the 
dissatisfaction with the current microcomputers can be 
traced to such a limited view. The system will be shown to 
be far more complicated than that. Growth of the system and 


certain identifiable stages are then looked at. 


Chapter III provides the upper level manager with an 
overall view of computers, including simplified operating 
theory, capabilities, ad limitations. The emphasis is on 
microcomputers and especially the Zenith 120 System, which 
is being supplied to Navy commands. In most cases these are 
the first microcomputers these commands have owned. 

Software programs that can be applied to do a certain 
task are at the heart of the current microcomputer problem. 
It is important for the executive to understand what 
economic factors play in procurring such software. When 
software is to be produced in house, certain standards must 
be applied, again because of proven economic impact. 
Following the design considerations, the manager is provided 
with both ergonomic and psychological considerations The 
implications of physical and data security conclude Chapter 
LV. 

As part of the research for this paper, a survey of 
selected Zenith users was conducted. An analysis of this 
survey as well as information from NARDAC, Wing and Type 
commanders is provided. 

Descriptions of current software in use , as well as a 
complete listing of a personnel management program are 
included as examples of possible programs which would be 


useful to other commands. 
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II. BACKGROUND 


EN HIE GENERAL SYSTEMS THEORY 
The general systems theory provides a view point from 
which to observe a selected system. A system is described 


as being 


. made up of sets of components that work together for 
the overall objectives of the whole [Ref. 1: p. IIJ. 


This is accomplished by feeding inputs to the system, 
having that system perform a transformation process, and 
outputting a new or changed product. The theory is part of 
a whole class of approaches to managing and planning that 
attempt to tie together, ona broad level, as many aspects 


of a problem as possible. [Ref. 2: pp. 7-8] 
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Figure 2.1 Model of a Squadron 


Figure 2.1, adapted from Wetherbe [Ref. 3: pp. 10-12], 
shows a possible version of this input ~- transform ~- output 
concept. In this case it is interacting with the environ- 


ment and so is termed an open system. Other attributes 


LL 


would include being adaptive and organic, Char eis, ig 


depends on the environment for new materials, energy, "a 
information. Ihe interaction may change over time and so 
can not be entirely predictable. In a squadron, people 


reporting aboard generally have a lower skill level than 
when leaving three years later. Demands of the environment 
(Wing, etc.) will change as that system itself interacts 
with its own environment. The emphasis and demands of one 
period will fade and be replaced as the larger system 
experiences changes. The availability of spare supply parts 


may change as the supply system is affected by its structure 


and environment. By being adaptive, the squadron can 
respond to changes and continue to operate. By approaching 
the problem from as many aspects as possible, improved 


results can be realized, as the subsystems involved will be 
equally stressed [Ref. 4: p.7]. 

A further refinement in the system model requires some 
Sort of "control. By allowing a method of feedback, the 
system can react to changes in a predefined manner and 
attempt to recover from movement in an undesired directions 
It is not always necessary that the feedback be bounded on 
all sides, such as an engine governor which seeks to main- 
tain one specific speed. Often a correction is only desired 
in one direction, like increasing office rodu M The 
manager, in setting such a control, must still keep the 
system as a whole in mind as other undesireable conditions 
may surface in a different area. 

The short term gains may be offset for example, by long 
term losses due to worker dissatisfaction. On the other 
hand, the short term gain may be all that is important to 
the manager and he may demand only that. It 1s importo» 
though, that the view of the system be from the highest 
level. As seen in Fig. 2.2, what may appear at one level to 


be obviously beneficial may, in fact, be detrimental to the 


jez 





Ergure 272 View of the System Makes a Difference 


system as a whole. The good planner has to be imaginative 
and willing to take chances in playing out possible 
scenarios of what may happen in the future. Sometimes there 
will be conflicting objectives. He must be alert to avoid 
quick, easy solutions to solve a single problem that may 
later prove unsound for the organization as a whole. Each 
alternative must be weighed against achieving the desired 
overall goal, and how alternative courses of action may lead 
toward or away from stated objectives. A thorough under- 
Standing of the system boundaries is essential since the 
environment has a strong impact on the ability to reach the 
objectives. By knowing the environment, a better evaluation 
of alternatives can be made. As the leader is probably 


aware, a sound plan may still be very distasteful to some 


people in the organization. In this case, the goal of a 
subsystem may not have been fully considered, and when 
reviewed, may lead to a new alternative. | Reta: DD. 
E592173] 


Ihe system description can be refined for a squadron as: 


l. The measure of performance 
the manager (i.e. the C OU 

ATEN i ronment, as constrained by the level of 
eee ey degree of training, deployment 

commitments, and other outside forces. 


as defined by 


is 


The resources in su and personnel. 

The components or subsystems as established 

in the sguadron organizations su eens 

5. Ihe management, or decision policies of the 
C.O. and his degree of commitment in each 

area toward the objective. [Ref. 1: p. 65] 


PU 


In designing the system, it is important to first estaba 
lish the criteria or objectives of the system. The system 
itself is determined further by deciding what entities 
(smallest subsystems) to include and how to structure the 
entities [Ref. 5: pp.84-109]. In the case of a typical helo 
squadron, inclusion would be selecting certain people (enti- 


ties) with known skills (attributes), to form a deployable 


aircraft detachment (objective), in the squadron (system). 
The structuring would be the mix of talent on the det. The 
inclusion process is, to a large degree, determined by the 


style of the manager and how he defines the objectives of 
the system. 

The organization, or squadron in this case, is not 
formed spontaneously, its structure is based on events 
rather than static physical components, each exercising 
wills of their own. The departments of the squadron, each 
division, and even the individual members all contribute to 
the overall shape and make-up of the squadron structure. 
This autonomy of parts is a major variable in a human social 
system and causes a corresponding increase in the number of 
degrees of freedom for that system [Ref. 6: p. 25]. 

The interdependent elements, and the interaction between 
them is essential for understanding a systems approach view- 
POIN, while communication and information flow must be 
related to the system structure to fully understand the 


organization under study [Ref pss 


BA" COMPUTER AS YO LS 
A computer system, in a Administrative environment of a 
squadron, is made up of numerous components which interact 


to satisfy a particular need. It is important to note" tie 
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Ghemeempuber itself is only one of the components. Lt and 
its related hardware must be joined with software programs 
and information data. In the recent Zenith buy, only hard- 
ware and limited programs were purchased, leaving applica- 
tions programs and the data to the individual command to 
Ročice. But the system is still more than just hardware, 
m crams, and data; it must also include the people who run 
it and the procedures they must follow. These five parts 
successfully describe a business computer system, and each 
must be understood for the successful integration needed to 
satisfy the desired goals of the system. [Ref. 8: p. 22] 

The hardware is normally the most obvious part of the 
system. The terminal provides a method of input to the 
computer or specifically the central processing unit (cpu) 
and associated circuits. The screen can echo this input or 
can display the completed output visually. The disk drives 
provide a rapid input method and can also store the output 
magnetically. The output could also be sent to a printer 
for permanent, readable copy. 

The programs provide a way of customizing the computer 
HeMeomplete a certain task by providing instructions for it 
to perform. In this way a general purpose machine, like the 
penita 120, can be made to do a number of tasks that is 
limited only by the number of programs available. The basic 
functions of the bare machine are essentially limited to 
peeing, subtracting, storing, and comparing. A program 
merely causes the computer to perform these functions ina 
certain sequence. € Mearem mu Mcone:ructling and conmbinind 
these simple functions, the software programmer can write 
instructions to build hundreds of different applications 
programs that will all run on the same piece of hardware. 

The programs fall into two broad categories: systems 
programs and applications programs. Systems programs, 


generally supplied with the microcomputer hardware, provide 
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fundamental housekeeping for the computer sun as ka ci 
the character "A" on the screen when the "A" key is pushed, 
properly writing information on a diska s mmm ene VRH 
done, and showing the directory names of programs on a disk 
when "DIR" is  typed. The other category, applications 
programs, is aimed at solving a particular problem, such as 


drawing a pie chart of OPTAR expenditures or giving a 


printout of the squadron Ss Beca imo mim Programs available 
commercially solve general business type problems, such as 
word processing. Problems unique to one command or one 


community would have to be custom written with those partic- 
ular needs and problems in mind. 

Data is the third component of a business computer 
system. This is the information that describes all the 
facts needed to solve the specific need. The data must be 
in a certain format to be compatible with the application 
program in use and it must be entered and stored so that 
that program can use it. The descriptions provided by the 
data must accurately reflect the real world situation or the 


resulting output will also be flawed. The types of datascam 


be labeled the same way as hardware: input data, processing 
data, output data, and stored data. [Ref. 8: pp. 22-28] 
People and procedures are the last two components. The 


procedures tell people how to enter data, what to do wnen 


errors occur and how to operate the computer. The key 
component, people, includes the users who actually operate 
the microcomputer, the programmers, and the clientele who 
use the end product. The manager must integrate these five 


components and consider them all as part of the system or 


benefits will not be realized. 


C. STAGES OF COMPUTER GROWTH 
When a computer system is introduced into an organiza- 
tion, its growth and, significantiy, the way it sho cm 


managed, can be divided into identifiable stages. The 
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stages relate expenditures and growth to time and experience 


in system development. PEQUES "ZO Shows the Characteristic 
S-shape, Segamning Wits = =tMestmeseoauctiOn of the system, 
Biome with expansion, slowing vien formalization, and 


inm a flattening out at maturity [Ref. 9: pp. 76-88]. 
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HOMO ul. S The Four Stages of Growth 


The four stages shown in Figure 2.3 were later expanded to 
six [Ref. 10: pp. 115-126], but the relevance of the theory 
can be adequately explained using the original form. 

Beage 1 is initiation. The long-term effects on 
personnel and the organization are rarely addressed by 
Management at this point. Responsibility and location of 
the computer usually go to the department with the first or 


Beagest application for it. This may present a problem 
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later when the system is more broadly used. Tne " firse 
department becomes protective of the system, and the departs 
ment head may see it as a source of personal influence and 
power; giving it up may not be acceptable to him. 

The first stage may also cause some anxieties to appear 
as the new technology is introduced, Chapter IV treats this 
problem more fully and provides the manager with symptoms 
and remedies to minimize the disruption that has often been 
observed in similar settings. 

The first stage is characterized by simple, cost or 
labor reducing functions. Management of the system is lax, 
not many controls are in place, and priorities are generally 
first-in/first-ouüt. 

Stage 2 is expansion. Broader and more advanced appli- 
cations are used as more departments try to exploit the 
"power" of the computer. In a mainframe environment, the 
system will be able to absorb many new users, but with a 
micro, one user ties up the whole system--input, processing, 
and output: More users mean less time for each. This 
period is marked by unplanned and mostly unsupervised 
growth. Projects multiply, but with little coordinan 
Duplication of effort and incompatible data grows. Ihe mosg 
knowledgeable personnel take on projects they see as well 
intended, although in reality may be only personally inter- 
esting and rewarding, but not in the organization's best 
interests. It is important for the C.O. to anticipate Gime 
stage and while encouraging new uses, experimentation, and 
growth, direct these activities ina productive and far- 
sighted manner. His department heads should be aware of 
what to expect at this stage and work together to ensure 
coordinated projects that satisfy individual, as well as 
squadron needs. 

Stage 3 is formalization. This is the time that 


stricter control methods are put into force. It may finally 
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be realized that a senior chief or a lieutenant-commander 
can't be used as a resident programmer and primary terminal 
operator. The cost is too great. Formal control steps must 
replace the informal relationships. What normally occurs in 
stage three, should ideally be addressed early in stage two, 
but too often the control stage is not anticipated and 
becomes reactionary. Selection of projects and standards 
for the projects should be addressed early. All departments 
should be involved and the C.O. should be kept aware of the 
progress in each major project. 

Stage 4 is maturity. This is the point at which the 
system will be able to return continuing economic benefits. 
Both users and senior management understand the technology 
and there is a comfortable feeling with the applications. 
This can actually be a difficult time for the senior 
manager, who must keep this harmony, but at the same time, 
keep up with newer methods. If no changes are made, his 
organization will fall behind technologically. If new 
changes are introduced, he disrupts established harmony. 
What is needed is a plan to flatten out the curve and 
prevent sliding too far back on the curve. [Ref. 9: pp. 
eas) — 

Although Nolan's model is a widely accepted frame for DP 
growth, Goldstein and McCririck [Ref. 11: pp. 309-324] offer 
an alternative for the S-curve. Their conjecture is that 
Ee initial flat growth (initiation), followed by rapid 
Expansion (Nolan's Stage 2), and then a flattening period 
(control), was due to the introduction of new technology and 
national economic prosperity during those middle years. 
Nolan's maturity stage was not questioned. Despite this, 
the model has remained a standard for industry measurements 
of DP growth. The exact fit of the Nolan model with respect 
to microcomputers remains to be proven, especially given the 


explosive advances in the last three years. Ihe basic 
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growth pattern, however, appears logically sound and at 
present remains a good model for comparison when the manager 


looks at the state of his own computer growth. 
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III. COMMAND EXPECTATIONS FOR THE MICROCOMPUTER 


A. BASIC COMPUTER INFORMATION 

Depending on career paths and educational backgrounds, 
many top level managers have reached their positions without 
exposure to the fundamentals of how computer hardware and 
software work together. Knowledge of this information 
allows the manager to better understand the capabilities and 
limitations of the microcomputer system and, therefore how 
to to better employ those assets within the command. 

ie Bbingeyecouncing 

The computations done by the computer, the numbers 

and letters stored init andall that is stored on the 
floppy disks is done with binary digits called bits. Like a 
bulb that is either on or off, only two states exist in this 
numbering system. In this base 2 system, each digit can 
provide only two pieces of information. By Combining Diles, 
more complex pieces of information can be represented. In 
an 8-bit machine, eight bits are combined to form a byte. 
Each byte is a combination of eight l's or 0's, so the total 
number of different patterns is 2 raised to the 8th power, 
or 256. This allows all the letters, upper and lower, all 
punctuation, and all 10 digits to be represented and still 
allows for extra characters, usually called control charac- 
ters. If the word size of the machine is increased to 16 
bits then it can represent 65,536 different patterns, making 
it much more versatile. The Zenith comes with two CPUs, one 
for  8-bit and one for l6-bit modes. The bits in the 
computer are represented by either direction of current flow 
or by voltage level (usually Ov = 0, 5v = 1). On the floppy 
disks, the brown oxide coating is very similar to audio 
cassette tape coatings. The bits here are represented by 
the direction of magnetization at selected points on the 
ENSE.  [Ref. 8: pp. 31-32] 
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2. Memory 

The Zenith computer is supplied with "random access 
memory" (RAM) boards that provide 256" KbytesWof interne 
storage space that may be written to by the user or by the 
program. One K, or kilo, is (2**10) or 20220 ii ie m Ma 
rounded to 10003 By adding more boards inside the computer, 
memory can be increased to 768K. The problem with RAM is 
that when the computer is turned off, what was stored is 
lost. The disk storage system allows the RAM to be copied 
onto a floppy disk and saved. The computer also has "read 
only memory" (ROM) which holds permanent instructions to 
tell the computer how to do simple start-up andio CHEE; 
general operations, such as reading a more complex program 
obra talsk. The instructions on the integrated circuits 
holding ROM are coded by the manufacturer and cannot be 
changed. Ihe CPU is the part of the computer that actus 
does the work. Ihe Zenith has an 8-bit 8085 anda 16-bit 
8088. These CPUs are each made up of a timer (control 
unge an arithmetic and logic unit (ALU) to execute 
instructions, and a memory section to hold instructions and 
data. Depending on the program only one CPU will be active 
at a time. 

3. Disk Drives 

Ihe Zenith is normally supplied with two floppy disk 
drives, refered to as A and B. This permits a program TD 
to access data in B. This arrangement makes more room 
available for data and keeps the data isolated from the 
program disk. The drives each contain a motor to spin the 
inner part of the disk and a stepping motor to precisely 
position a magnetic head on the disk's surface to read or 
Wwelte information: A new disk, when it is formatted, is 
magnetically divided into concentric rings called tracks ange 
each track is divided, like a pie, into sectors. Each 
sector typically holds 128 or 256 Soda en The data 
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is arranged on these sectors in a known pattern permitting 
later retrieval of the desired information. A full disk 
amino about 320 Kbytes of information, which is equiva- 
Memento over 100 pages of text. The floppy disks must be 
rated at double sided and double density. Although less 
expensive single density disks and even single sided disks 
can sometimes be made to work, disks which have been 
certified by the manufacturer at the higher capacities will 
provide more reliable service. 

The disk spins at about 300 RPM and the stepping 
HEP can quickly move in and out to reach any part of the 
disk's surface so the operation seems almost instantaneous. 
However, the computer's CPU can work much faster than the 
mechanical disk drive so it still must wait while informa- 
tion is read or written. A program, when it accesses the 
disk, will noticeably slow down while it writes or retrieves 
information. The actual delay is due to three factors: the 
head must move to the proper track, the disk must rotate to 
the proper sector, and then the data must pass under the 
head. This time, measured in 20's of milliseconds, can 
become significant in terms of user wait time when multiple, 
consecutive reads are requested, such as in data base 
queries. Similar delays would be expected when . writing 
information to the disk. A more efficient but higher priced 
system uses a hard disk or "Winchester" drive. This is a 
sealed, multi- platter drive that spins faster and can pack 
the recorded data tighter on the disk. This results in 
faster access times and storage equal to ten megabytes or 
Pent thirty floppy disks.  [Ref. 12: p.21] 

4. Printers 

The two types of printers supplied with the Zenith 
are dot-matrix and daisy wheel. The daisy wheel has 
preformed letters on a removeable element and produces 


eso, high-quality output, but at a relatively slow rate. 
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The print elements can be interchanged so that different 
type styles may be used. The dot-matrix printer uses a head 
with a vertical row of pins that are controlled by the 
computer to produce characters as the head moves across the 
paper. the output is fast at 100-200 lettersiper Secondi 
but each character is formed of a 5x7 dot maju MW av UH 
which gives the familiar "computer output” quality andas 
not suited to professional correspondence. Newer printers 
are now available that make two passes over a line to more 
completely fill in the characters and come close to "letter- 
quality" output. The big advantage of dot-matrix printers, 
besides fast output, is their ability to produce graphics 
and to change font styles on-the-fly. Charts, graphics Mana 
pictures can be printed as part of a text document and the 
text itself can be of different styles, even on the same 
line oro Drine: A third type of printer which uses a laser 
scanned drum, can produce output as good as a very high 
quality photocopy. Printing a whole page at a time, it has 
the advantage of business-quality output and graphics, but 
cost is three to four times that of a good dot-matrix 
Princ cer.: 
5. Modems 

Modulators/demodulators provide ' the necessary 
connection from a computer, via telephone lines, back to 
another computer. Software programs such as BestTerm handle 
the interfacing, dialing, connection, and upload/download 
requirements for transferring data and programs. Modems are 
available at several baud (switching) rates, but 300 and 
1200 baud are most common. At 300 baud the transmission 
rate is slow enough to be read by the user as it comes in, 
however the 1200 baud speed is four times faster and propor- 
tionately reduces the required connection time. The ability 
to remotely download information opens up a broad wealth of 


opportunities. The Naval Data Analysis Center in Washington 
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presently has numerous programs available for download to 
fleet commands. Within a single command, multiple micros 
could be networked together and allow data to be shared 
among the different departments. in another area CNAVRES 
now sends out reporting orders for reserve personnel via 
modem to a printer at the parent command, thus reducing to a 


few minutes what had previously taken weeks. 


B. APPLICATION PROGRAMS 

The software programs provide the computer with the 
flexibility to be used for many different types of jobs. 
This section describes the programs that are being supplied 
to Navy units as part of the standard start-up package and 
details their major functions, strengths, and limitations. 

1. Disk Operating System (DOS) 

The DOS is the program that is loaded into the 
computer first. It contains the instructions for the disk 
drive functions such as formatting or copying. With its two 
processors, the Zenith can run both 8-bit CP/M programs and 
16-bit MS-DOS or Z-DOS programs. CP/M stands for "Control 
Program for Microcomputers" and has, over the last = ten 
years, become the standard operating system for 8-bit micro- 
computers. In addition to the hundreds of commercial soft- 
ware programs available, Froehlich [Ref. 13: pp. 65-385] has 
cataloged over 5000 programs that are available in the 
pNUEPc domain. For the most part, the authors who wrote 
these programs did so for an immediate need at the time but 
some may be adaptable to current squadron needs. 

a-DOS was the original DOS supplied from Zenith, but 
the more universally used MS-DOS is now the favored and 
primary operating system, giving a rich variety of commands 
and allowing the machine to run many commercially available 
text format programs. The major functions of DOS are 
loading, saving, and copying files. The MS-DOS manual, in 


its 600 pages, provides extensive information on getting 
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started with the system, the primary features and commands, 
and even on program development. Three special commands are 
worth noting: 

1) Ihe RDCPM command can read CE IM Tor | mueeci 
disks and copy them into MED MW ar mer ceu 
disks, making more programs available and 
standardizing the format: 

2) The MS-DOS command CIPHER can ene se files 
or create encrypted copies of regular files, 
making them unreadable to others noe knowin 
the original key word. Without knowledge o 
the key word, files cannot be run, listed to 
the screen, or printed [Ref. 14: EH 11.64]. 
Although this would not be accepta e Eeo 
unlocked classified material under een 
Ser jes Noe m pO rr information like 
fitness reports or enlisted evaluat ione e oen 
be stored under this protection scheme. 

3) The RECOVER command can salvage the useable 
portions off a diskiwhich developes rae 
sectors. Bad sectors are areas with mac EE 
or physical damage to the disk that makes that 
part of the media impossible to read. This 
feature may be able to salvage most of a 


damaged disk and not reguire recreating tne 
files manually. [Ref. 14: p.11.264] 


Ze Disk Library Organization 

As the number of files created by a squadron 
increase, it is important to maintain some systematic 
ordering scheme for all the disks and files. DOS will allow 
many filetypes--program files, command files, text files, 
and data--to reside on the same disk, but it is far more 
productive and less confusing to users if an organized 
system is established. The command's disks will normally 
fall into the following categories: system disks, working 
disks, archive disks, backup disks, and library daisies 
EREL: IBA c5 

The system disks hold the operating system, command 
files, and other frequently used files. This disk is 
mounted in drive A and should contain the word processing, 
data base, spreadsheet, and language programs. 

Working disks are those created while using the 
systems programs such as text files from WordStar or data 


for dBase II. These disks would be used in drive B. 
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Archive disks are used to save old files for histor- 
ical purposes or for infrequently used files. 

Backup disks are copies of system disks, working 
disks, and archive disks. They provide a means of recrea- 
ting data that might be destroyed if an original disk cannot 
be read for some reason. The backup should be stored at a 
location that is physically separated from the original so 
that both copies are not lost in the event of theft, fire, 
or other disaster. 

A backup copy of all command disks is cheap insur- 
ance, but creating them at too frequent an interval can be 
costly in terms of manpower. The rule is to leave only as 
much as you are willing to lose, unbacked-up. 

Library disks are a cataloged collection of all 
software held by the command. 

DOS allows a file to have a filename of up to eight 
letters (and/or numbers) followed by a period and then an 
extention of up to three more characters. The labeling 
System can make use of this somewhat limited naming ability 
by describing the disk with its subject plus a number and 
using the extender to identify the type of file. Thus 
possible extenders could be: SYS for system, DAT for data, 
BAS for basic, COM. for command, EXE for executable, ASM for 
assembly, and BAK for backup copy. For instance, 
AIRCRET8. DAT might be a file holding flight hour data on 
Aircraft 08. Each disk itself should have a label marked 
with a felt tip pen (to prevent disk damage) to describe and 
number the general contents, and a file such as DISKSOO1. DOC 
Should be maintained to keep track of all the files on each 
disk in the command's collection. Since the number of disks 
used by an organization multiplies very rapidly, it is advi- 
Sable to set up a filing system as part of the introduction 
phase. [Ref. 13: p. 54] 
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34 Data Base Management Systems 

A data base management system is a program that 
allows the user to organize and quickly access large collec- 
tions of related information. After word processing, this 
type program can probably provide the most benefits fora 
command. Appendix B, for example, is a driver program 
written for dBase II that the squadron Admin officer might 
use. Producing printed lists pertaining to members of a 
squadron, it has a menu with choices that include security 
listings by clearance, a recall bill, a seniority listing, 
and. a PRD listing. The basic information about each 
squadron member is held in a data file which the program 
selectively accesses to pull out only the desired informa- 
cion.: Thus the seniority listing would not include home 
phone number, but the recall bill would. The maintenance 
department might use a similar program to track aircraft and 
engine hours, time left before periodic inspections, and 
even print out an up-to-date aircraft custody report. The 
training officer might keep all audio/visual and training 
devices cataloged and could print an inventory or "PMS due" 
I3 st. In operations, all pilot qualifications and expira 
tion dates could be maintained and quickly printed. The 
more complex the collection to be controlled, the more a 
computer can help. |Ref. 15. p92»»-2] 

Although it would be possible to write a program in 
BASIC, COBOL, or Pascal that could search through ar dla 
file to find a piece of information, the program would need 
to be rewritten for every new bit of information desired. 
The major advantage of a database management system is that 
these search functions are built in so each search is initi- 
ated with a simple English-like query such as, "list all for 
name = SMITH. " All the Smiths in the command will quickly 
be displayed. Since dBase II is a relational data base, two 


data files can be used at the same time and the ad hoc query 
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could be narrowed to "list all for name = SMITH and dept = 
MAINT. " The point is that special searches can be made 
without having to write and test a new program each time new 
information is desired. For known periodic requirements, 
like a recall bill, a special driver program similar to 
Appendix B can be created to allow even an inexperienced 
Moet tO print out the reports. Every step is menu driven so 
very little training 1s required. 

The storage capacity of a floppy disk limits the 
dE Of an application file. Figure 3.1 shows the parts of 


a record. 


Characters 


fields 


(LNAME) JONES 
(FNAME) JOHN 
(Mi) I 
record (STREET) 9876 MARINE WAY 
(CLET) OCEANVIEW 
Ge NATE) CA 
(ZIP) muc dcs ll 





Ei1qure 397 Parts of a Record 


The records for many people would be combined into a file to 
be stored on the disk. The record itself is made up of 
different field categories and filled with characters. This 
example has seven fields in the record. To make room for 
longer names and addresses, 20 characters might be reserved 
in each field. This record would then require 140 bytes 
(one for each character) to store on a disk: Before 
searching for a last name, the records must be indexed 
( sorted) by last name. The index file would need about 22 
bytes per record, so the disk would be able to hold about 
2000 records with the name index. As more indices are used, 


less space would be available for records, even though dBase 
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II allows 65,000 records to be addressed. dBase II can 
handle 32 fields per record and 254 characters inercia» 
but with a maximum of 1000 characters in any one record, 
Thus a data base describing a squadrone M rates, 
addresses, phone numbers, dependents, and security clear- 
ances, will fit nicely onto one disk. 
4. Word Processors 

The Navy has relied on word processors for a number 
of years because of the flexibility in creating, correcting, 
revising, and expanding documents with the ability to then 
print out as many perfect copies as desired. Table I 
[Ref. 16: p.22] summarizes the advantages and disadvantages 


of a word processor. 


TABLE I 
ADVANTAGES AND DISADVANTAGES OF A WORD PROCESSOR 


Advantages Disadvantages 

Productivity increases due to Cost is greater than a 

less retyping. , EYDeYEJJ Gr. 
Work done in less time. More training requiera 
Accuracy is increased (less New filing methods are 

repetition, spelling needed. 

check cc Compi ia must be in anig 
More done with fewer people. status to access files. 
Less storage room needed. More space neededujeom 

Instat ae tem 


WordStar by MicroPro is a highly flexible word 
processor with a rich variety of commands that provide 
almost every function desireable in a word processor. Pe 
has selective settings of "help" levels, edit-while- 
printing, ability to read in files to text and automatas 
production of back-up files. It can also be used in 
Coma Une com WIE SpellStar (a 20,000 word spelling/ 
vocabulary checker that can be augmented with user-specific 


words or acronyms) and MailMerge (a time-saver for repeti- 


tive documents). On the negative side, the commands are not 
intuitive to the average user. They may become second- 
nature to the frequent user, but must be memorized. The 
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ME or the commands require at least two or three key 
strokes (i.e. the control key and another key simultane- 
ously, followed by a third key). The view of what the text 
will look like when printed is deceiving, especially when 
using the Special Effects commands. WordStar also does not 
show' the size of a file, date of creation/revision or amount 
of space left on the disk or in memory. While editing, 
WordStar does not automatically realign paragraphs. The 
program comes with WordStar User's Guide but the fact that 
at least six other books like WordStar Made Easy [Ref. 17] 








have been published, underscores the sometimes tedious and 
confusing commands of WordStar. No one manual seems to 
encompass and easily instruct the novice user who is often 
told of two or three different ways to do the same editing 
function. The manager should keep these limitations in mind 
when directing training for new users. 

The manager should also control the number of times 
a document goes back to the yeoman for correction and 
Boprinting. There is a strong tendency for each level in 
the "chop chain" to submit a letter-perfect draft for review 
because it is "so easy" to put it back through the computer 
for one or two clean-up.changes before the next superior in 
the chain gets it. A letter may be reprinted a dozen times 
before it reaches the C.O.'s desk for signature. The 
Changes may be effortless, but time and manpower are clearly 
not being optimized. 

5. Spread Sheets 

The ability to set up an electronic spread sheet 
greatly simplifies and speeds up financial and other tabular 
calculations. The spread sheet is a grid of "cells" defined 
by rows and columns. Fach cell can hold labels, numbers, or 
formulas, so that a full financial statement can be set up. 
The power of the program is the ability to fill cells with 


formulas, rather than hard values, which take values from 
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other cells to compute the defined value. Thus a change in 
pricep for example, at one cell will be automaticaly 
computed in every other cell that uses that price. The 
manager can get extremely rapid answers to his "what if" 
questions. Examples: 
(1) "If we double our flying hours for the next two 
y how will it affect our available fuel 


(2) "Show me all those who will have the required 
time in rate before the next advancement cycle." 


Whole worksheets or just extracted parts can be printed or 
saved to disk. 

The supplied Lotus 123 is a popular and powerful 
spread sheet program that is relatively easy to set up and 
use. It has a grid size of 256 columns by 2048 rows. The 
"active area" seen on the screen is eight columns by 20 
rows, but any point on the grid can be quickly reaches 
Lotus supports "macro" instructions ui are stored 
keystroke sequences that make setting up a sheet, or temp- 
late, much easier. This also allows a less Knowledgeable 
user to learn to use the program more quickly. By pressing 
the ALT key plus a letter key, a string of preset commands 
is automatically executed. [Ref. 18: p. 112] 

Lotus 123 also provides a limited data base manage- 
ment system and a graphing capability. The records of the 
data base are stored in matrix form with each record ona 
row and the fields of each record under a different column 
heading. With this capability the data does not need to be 
restricted to just financial data. Any information that 
needs to be tracked, sorted and retrieved can be entered. 

The graphing feature of Lotus is particularly useful 


for the manager in spotting trends or anomalies in the 


matrixed data. Six sets of data can be graphed at once from 
the stored data. The pictorial record also makes the 
effects of "what if" questions easier to evaluate. Lotus 


can provide bar, stacked bar, pie, and line graphs [Ref. 18: 
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ppm zS-224]. ie we three paLts of Lotus work together in 
what are called "interactive programs. " Information 
entered once Can later be used by any of the three programs. 
6. Languages 
There are five general types of languages used ina 
computer. Machine language is the lowest level and is 


written with series of binary numbers such as 11001001 for 


8-bit computers. These numbers, which represent instruc- 
tions and data for the computer, can be entered directly 
into memory locations in the computer. It is also possible 


to enter them in hexadecimal notation so that each 4-bit 
segment is represented by a number from 0 to 9 ora letter 
EOM A to E. The binary 11001001 can thus be shortened to 
C9, which is easier for the programmer. 

The next level up is assembly language. This uses a 
mnemonic label for each instruction. LDA 3 would mean to 
immediately load register A (a storage location) with the 
value 3. Each line of the program contains similar abbrevi- 
ated instructions. An experienced programmer can code a 
program with these mnemonics much easier and faster than 
with binary or hex numbers. When the program is finished, a 
special "assembler" program converts the code into a machine 
code "object program O E the computer to execute. 
EN 19: pp. 52-55] 

The three highest level languages rely on compilers 
and interpreters to produce code that the computer can use. 
A compiler takes a whole program written with English-like 
commands and compiles (transforms) it into a machine 
language program that can be run by the computer. A pseudo- 
compiler does the same, but produces an intermediate code 
est. Ihe Z-BASIC supplied by Zenith uses an interpreter. 
Ihe program is written by the programmer using the dialect, 
m mmer, and syntax of BASIC. When it is run, the inter- 


preter program takes each line of BASIC and translates it 
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into machine code. When a branching instruction is encoun- 
tered, the interpreter searches from the beginning of tip 
BASIC program until the named line number is found. These 
two factors cause programs written in BASIC to run very 
slowly, but the writing of the program is easier Jehan am 
other languages. Z-BASIC also has built-in error checking 
codes to help the programmer in debugging a program during 
development. Additionally, it is supplied with a compiler 
program that allows programs to be developed and tested in 
BASIC and then be converted into object code that executes 
much faster. A side benefit to this is that the object code 
produced is itself unreadable and therefore secure, but it 
will still execute the program. The compiler, unfortu- 
nately, does not support all BASIC commands. [Ref. 20:0 
40-53] BASIC is probably the most popular language used on 
microcomputers, but its ease of learning and use also lead 
to important shortcomings of the language. BASIC codem 
written with a line number followed by a command or state- 
ment. The line numbers usually start at 10 and skip by 10's 
so that extra lines can be later inserted during the debug- 
ging phase without having to renumber the whole program. 

A typical BASIC program looks like Figure 3.2. This is a 
sample program that determines interest on a given prin- 
cipal. By placing the calculating portion of the code near 
the beginning, the interpreter can run faster because there 
is less line searching. The GOSUB and GOTO commands allow 
movement to other parts of the program, but this jumping 
around makes the logical process of the program more diffi- 
cult to understand. The smooth left margin makes it diffi- 
cult to pick out specific parts of themes c dra. A longer 
program, covering many pages, would be very difficult kus 
understand and therefore difficult to maintain even for the 


original programmer. 
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— m = pm 


REM INTEREST av YzAR 

REM SET oF =RUDAAmM 

GOSU zaw 

REM PRINT PRINCIPAL AND INTEREST 
PRINT 
LET Ase eC i+ R/U) -N 
PRINT “YEAR = ":N 
FP RINT “AMOUNT = ":A 
REM INCREMENT YEAR COUNT 
EST N=N+]I 
REM COMPARE COMPUTED TO DESIRED YEARS 

IF ND) Y THEN END 

GOTO Sa 

PRINT “IF YOU TYPE THE AMOUNT OF FRINCIF AL” 
PRINT “GND THE INTEREST RATE PER YeERR. I wick” 
PRINT "SHOW HOW YOUR MGNEY GROWS, YEAR EY YEAR" 
REM GET INPUTS 

GOSUB ua 

RETURN 

PRINT 

PRINT "PRINCIPAL AMOUNT:”: 

INFUT P 

PRINT "PERCENT INTEREST RAaTE:": 

INPUT R 

PRINT “NUMBER OF YEARS:": 

INPUT Y 

REM INITIALIZE YEAR COUNTER 

LET N=1 

RETURN 





BPiquress 2 BASIC Program to Compute Interest 


Contrasting the BASIC program with the Pascal 
program in Figure 3.3, it can be seen that the latter is 
written in a structured form. It 1s made up of four modules 
or "procedures" that each perform a specific task. Each 
procedure is identified by a name and also defines any 
values that will be passed to or from it when the program 
executes. Each procedure can use both global variables and 
with variables defined only within itself. This allows 
procedures to be written that are relatively independent 
rather than tied specifically to a single program. The 
lines are unnumbered and indented to form small pockets of 
logical operations. The actual writing of the program can 
be done on a word processor which allows easy editing, move- 
ment of blocks of code, and the insertion of previously 
developed procedures for reuse. This approach makes the 
design, development, and maintenance of the program easier 
fame attempting to work on a single, monolithic program. in 
mre 3.3 the main program is actually only four lines 


long, essentially calling on previously defined procedures. 


Sie 


PROGRAM INTEREST (INPUT. SUTPUT) : (#CALCULATES Tae TOTAL MONEY 
EARNED FROM PRINCIFAL AND INTEREST) 
VAR 

PRINCIPAL : REAL: (#STARTING PRINCIPAL *) 

RATE 2 REAL: (#INTERESY RATE) 

YEARS : INTEGER: (NUMBER Ge YEARDS*) 

PERIODS s INTEGERS (*COUN Coe gee seen? 


PROCEDURE SETUF_“ROSLEM: 
BEGIN 
WRITELN O IF YOU TYFE Tae AMOUNT UF ERINCIZAC?): 
WRITELN (AND THE INTEREST RATE FER YEAR. I wito’): 
WRITELN (*'SHOW HOW YOUR MONEY GRUWS. YEAR EY YEAH”): 
END: 


PROCEDURE GET PRINCIPAL AND INTEREST (PRINCIPAL, RATE, YEARS) 3 
BEGIN 
WRITELN (* PRINCIPAL AMOUNT:*) 3 
READLN (INPUT. PRINCIPAL) ; 
WRITELN (* PERCENT INTEREST:) 3 
READLN (INPUT, RATE) : 
WRITELN O HOW MANY YEARS: )3x 
READLN (INPUT, YEARS): 
END: 


PROCEDURE PRINTOUT_RESULTS (AMOUNT, YEARS) ; 


BEGIN 
WRITELN:WRITELN (* YEARS = ', YEAR); 
WRITELN (AMOUNT = °, AMOUNT) 3 

END: 


PROCEDURE CALCULATE _TOTAL_MONEY (KRINCTIPAL, RATE, YEARS) : 
BEGIN 
FERIODS z 4: 
DO UNTIL PERIODS = YEARS 
SEGIN 
PERIODS = PERIODS + 1: 
AMOUNT = PRINCIPAL * (1 + RATE/ 104) «*#reERLODS: 
FRINTOUT_RESULTS (AMOUNT, YEARS) ; 
END: (*DO+*) 
END: 


BEGIN (#MAIN FROGRAM*) 
RESET (INPUT. TERMINAL): (#GETS USERS HEYEJVARD INPUTS) 
SETUP FROBLEM: 
> GET_PRINCIFAL_AND_INTEREST: 
CALCULATE _TOTAL_MONEY 
END. ("OF PROGRAM) 


Main Program 


Eiguren Pascal Program to Compute Interest 


BASIC as well as Pascal and other structured 
languages like FORTRAN and COBOL rely on three syntactic 
forms to implement required logic for program formulation 
sequential, decision, and iteration provide the required 
structures as follows (Ref. 21: pp B ERE 


Seguential. The program executes each step in the 
Order encountered. 


Decision. Based on stated conditions, the program 
execution either continues or branches. This may be 


So 


an if/then decision or may be more complex based 
on a set of cases. 


ler arom ithe program loops through the same logic 
series a number of times while a count of the 

dd is maintained until a selected value is 
reached. 


m 


A. ECONOMICS CONSIDERATIONS 

The presence of a microcomputer in the squadron will not 
make or break the command, but having one that works well 
will give that squadron a great advantage in savings of 
manpower and ability of middle and top level leaders to 
better understand and therefore manage their areas of 
responsibility. There are costs and trade offs that must be 
considered when the decision to use a computer is made. Te 
is a waste of time to establish a data base to track some- 
thing in the squadron, unless there is also a commitment to 


spend the time and effort to keep it accurate and continu- 


ally updated. There must also be a commitment to training 
for users, for managers, and for those developing special 
programs for the squadron. The actual development of 


computer programs represents avery great expenditure in 
terms of manpower. Programs which are developed haphazardly 
or with poor documentation can result in increasing rather 
than decreasing workloads. Methods of software analysis and 
design will be discussed in the next section, but assuming a 
command has resident members who have the skill needed to 
produce specified software, the commanding officer must 
still decide whether the costs of applying this talent can 
be justified by the results realized in the finished 
software. 


Early and accurate prediction of software costs is 


difficult because of the nature of the product. Coded 
instructions are not a uniform commodity and are not even 
the end product, but only a means of accessing some other 
form of information. Software production requires coopera- 


tion between those who need the service and the person or 


group actually producing the program. And -finallig 
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programming is a creative process that 1s dependent on the 
experience, talent, and dedication of its author. 

There is a price to software whether it is produced 
in-house, purchased from a vendor, om contracted from 
NAVDAC. A common pitfall which leads to underestimating the 
cost of software is the assumption that coding is the only 
cost. More accurately, software should be considered to 
have a life-cycle with definite phases. Boehm [Ref. 22: pp. 
36-38] describes this in eleven steps: 


1) Feasibility. Defining the need, alternatives, 
costs, time requirements, and chance of success. 


2) Requirements. Complete specifications and 
required functions. 


3) Produce Design. Specifications for software, 
control, data structure, and draft user s manual. 


a) Deva MedWiesvgn. —~Retinement of design to 
2msdüscNNd | Stmictumes, relations, sizing, and 
algorithms for main modules. 

5) Coding. Complete set of program components. 


6) Integration. Properly functioning software 
products. 


7) Implementation. Functional system including 
data conversion, installation, and training. 


8) Maintenance. pM spumccroning update otf 
program. 


9) Phaseout. Transition to successor program. 


10) Verification and Validation. Was the program 
ua ne? das. it the right program to buila? 


11) Configuration Management. Milestone achievement 
and verification with each iteration. 


Figure 4.1 [Ref. 21: pm 56l] is a simplified view of 
development requirements in terms of time. The coding 
Pemerom is only one third or less of the total effort. ¡qe 
also does not provide for maintenance of the program which 
has historically required up to fifty percent of the total 
software development effort [Ref. 22: p. 18]. 

A "Constructive Cost Model" (COCOMO) has been developed 
which estimates software development effort and cost solely 


as a function of the size of the software product measured 
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Feasibility, 
Requirements, & 
Design 
39% 


Documentation 
3% 


25% 
Test & Debug 





Figure 4.1 Typical Development Time Requirements 


ln number of coding instructions: Ihe basic formula fom 


determining time of development in man-months is: 


MM = 4 AS (eqn 4.1) 


KDSI is the size of the program in thousands of delivered 
Software: “instruceions. One  man-month is 152 hours of 
working time. If more than one person is assigned to the 
project, the time of development is not reduced linearly but 


can be computed by: 


TDEL = 2.5 (MM) %38 (eqn 4.2) 


By dividing the total man-months by the time of development, 
the recommended number of personnel can be established. 
(Ref. 22: pp. 29-70] While the basis of development time is 
the number of lines of code, this must be tempered with 
other attributes which include tne vereduce the computer, 


personnel, and product management. The software products 
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OM ac oy size, complexity, and required reliablity. The 
computer capabilities will remain constant with the micro- 
computer available to the squadron. Personnel will vary by 
experience, programming capabilities, language experience, 
and familiarity with the project under development. The 
project attributes will vary by software development tools 
and required development schedule. By assigning multipliers 
for these attributes, an improved estimate of the develop- 
ment effort is possible. The multipliers are typically plus 
or minus ten, twenty, or thirty percent, depending on 
whether the attribute helps or hinders the development. 
[ Ref. 22: pp. 114-126] 

The determination of coded program length is determined 
by the complexity of the project and defined in the require- 
ments stage. Two examples are provided that may serve as 
base lines for other projects. 

Example l. 

The problem objective was to produce a thirty day flight 
schedule showing assigned crews, flight profile, take-off 
and landing times, operating area, and recovery base. One 
aircraft was to remain airborne at all times. Twelve crews, 
deployed three at a time, would each complete six to ten 
flights to randomly selected operating areas. Flights would 


last eight to twelve hours and would recover at randomly 


selected bases; the last flight for a crew to recover at 
home field. Figure C.4 shows the overall structure of the 
design. The program was written with all original code in 
Pascal and came to 3000 lines. The equations 4.1 and 4.2 
yield: 

MM = 2.4 (3KDSI) 1-95 (eqn 4.3) 


MM = 7.6 man-months 
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TDEL =“2 54( No Mia (eqn 4.4) 


TDEL 5. 4 months 

The program was actually completed in 4°56 man=months bv 
team of five programmers over a two month period. The 
shortened development is attributed to familiarity with the 
problem and the programming language. 

Example 2. 

The problem, to produce a set of menu selectable driver 
programs for dBase II, is listed in Appendix B. The program 
length, as in example 1, is 3000 lines, but the programming 
tools provided by dBase II and its underlying structure made 
development easier and faster. Completion time was under 
two man-months by a single programmer. 

A common method for determining the lines of code is to 
compute an expected value by taking a weighted average of 
the optimistic a, most likely m, and pessimistic b lines of 
code [Ref 25 apa a Clr: 


EXPECTED LINES = (a + 4m + b)/6 (egn 4.5) 


B. ANALYSIS AND DESIGN 

A thorough understanding of preferred software design 
methodology will not only greatly enhance the usefulness of 
programming efforts within a command, but also reduce future 
program maintenance and ensure a more reliable product that 
continues to meet performance expectations. The concepts 
presented in this section should be understood before 
command software development projects are approved. 
Appendix B and Example 1 above, will be used as the develop- 
ment examples throughout this section. The data base 
program provides personnel information via menu driven 


screens. After word processing, commands will probably find 
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data base management programs to be their most useful and 
time saving applications. 
1. Determination of Requirements 

Critical to a successful development project is the 
early, clear definition of what needs to be done. This may 
be initiated in the form of a request such as "I want a list 
of all personnel in the squadron who hold a secret clear- 
ance" or "I want an updated recall bill." The feasibility 
of the project should be looked at in terms of: 


a) Lec RC - can the microcomputer system 
handle the requirements? 


b) Economics - will there be sufficient benefits 
to justify the costs of creating and running the 
system or are the lost opportunity costs too 
great to not develop it? 
c) Operations - will the system be used or will 
user resistance prevent full benefits from 
the system? 
With this information, the C.O. can give go-ahead approval. 
A detailed  investigation of specific reguirements can then 
be started. Details about what is to be done, how often, at 
what volume, by whom, and how well must be completely under- 
stood by the  developer. [Re£. 21: pp. 18-21] The goal of 
analysis is to produce the optimal solution to the specific 
business problem under study. The product should be highly 
maintainable and sized by effective BParei tioning, Early use 
of graphical representations for the logical systems will 
allow the user to evaluate the model and offer criticism and 
modification suggestions before the implementation phase. 
2. Development Phase 
The central phase of software development consists 
of preliminary and detailed design, coding, and testing. 
Proper design applies various techniques and principles to 
produce a detailed model that can later be built. The 
primary tools available are data flow diagrams, data 


Sie ulonaries, and structure charts. 
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A key goal of structured™ analysis @sucon Oates: em 
the problem into manageable pieces that can be described in 
about one page each. The data flow diagram (DFD) is used 
for this as it provides a graphical representation of tae 
logical model for the system. Figure 4.2 shows the elements 
OCRAS DED 





Figure 4.2 Elements of the Data Flow Diagram 


It can be seen that A's arrive from the source S1 and are 
transformed into B's by process P1 (which accesses file F). 
Process P2 then transforms the B's into C's which are deliv- 
ered to sink SZ. Data flow, represented by the named 
arrows, is the pipeline through which information flows. 
Each data flow name should uniquely identify the data. Each 
process is represented by a bubble, and each process acts on 
incoming data, transforming it." Into ourgotagea. A 
process is named with an action phrase that describes the 
transform in terms of input and Movie ui c The third 
element of a DED is a file, shown with a double line. This 


is a temporary storage area for data, named to describe that 
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data. BE Memecess can access this data for reading or 
updating. The last element of a DFD is the source or sink, 
represented by a box. These are people outside the system 


that originate or receive system data. [Ref. 24: pp. 47-69] 


Personnel Information 


Pers 
Request 


Personnel Information 
A — = NI SEE 





Figure 4.3 Leveled Data Flow Diagram 


Development of the full DED is done in top-down 
refinement stages. Figure 4.3 shows how Level O of the 


personnel problem is expanded into Level 1 to show more 


process details. To maintain readability, each level should 
not be partitioned into more than abut seven elements. Le 
more are needed, a next-lower-level should be created. The 


leveling is continued until the system is defined in terms 
of simplified processes that can each be described in a one 


page specification called a "Mini-Spec." Appendix C shows 
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how this refinement is carried™ Out tonsa M 
system. 

The DED provides a picture of the elements and asso- 
ciated flows of data in a system. The Data Dictionary ( Dim 
supports it by fully describing all the evemene sani mor m 
In addition it includes the set of procedures used to bus 
anelnalncaln the Di The DD is a place to lookup defin 
tions Of the «2 Lows, components of flows, files, and 
processes. The DD and DED work together to give a full, 
clearly defined description of the system. A sample DD 
entry for data flow "BASES AVAILABLE" (J) of Appendix C is 


shown in Figure 4.4 . 


Datailow name: Bases Available (J) 
Aliasses: none 


Composition: 3-letter !.D. of all bases 
NOTAM dates and times base is closed 


Called by: Base Selector (7.1) 


Notes: Selected base may be rejected if NOTAM'd 
closed or if occupied by another crew. 


Figure 4.4 Sample Data Dictionary Entry 


The DD entry for a process includes a descriptione 
how the process will be implemented. The steps of the 
process are described in structured, English-like™ pseu 


n 


code. The elements of the process will be related by one 
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Sore on Only three relationships - sequence, decision, or 
Ooi ric. Instead of a text description of the process, a 
decision tree or decision table can be used to show the 
process as pictured in Figure 4.5. The method selected 
should be the one that can most clearly describe the 
process. [Ref. 24: pp. 129-178] 


Conditions and Actions for CHECK_BASE 
(module 16 of Figure C.4) 


condition combinations 
El MA AA 
G2 ze > Z MEJI 
C3 E T F -T 
action decision 
Al X X 
A2 | X X X X 


F F 
T F 
F T 


M A2 


LÁ 
A2 


E 


T C3 
a TE —a2 
2 
F ad 


(0 TR —A2 


conditions actions 
Cl Base occupied Al Land at base 
C2 Base NOTAM'd closed A2 Reject and choose 
C3 Last leg of deployment alternate base 





Figure 4.5 Decision Tree and Decision Table 


After completing the data flow diagram and the data 


dictionary, the "Structure Chart" may be constructed. The 
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structure chart is a graphical description of the software 
modules that will make up the finished system. The chart is 
constructed by dividing the data flow diagram into three 
phases of data flow--afferent (inbound), transform (center), 
and efferent (outbound) flew Ine chart is composed a9 
boxes containing the names of the modules. Interconnecting 
the boxes are lines for data flow. On each line is an arrow 
showing the direction of flow. The structure cChare MN 
Appendix C shows afferent flow from module 1 to module 2, 
transform flow down the center ofthe chart, and efferent 
flow out, to module 3. The chart should fan outi r Om CE 
main control module (in this case, module 2) and then fan in. 
again near the lower modules since these common modules are 
used by more than one module at higher levels in the chart. 
[ Ref. 23: pp. 178-202] 

Figure 4.6 illustrates the three steps fou 
converting the data flow diagram into a structure chart. 
Starting with the inner-most bubble of the afferent flow and 
working outward, the modules for getting, reading, and 
making data are charted. These produce "b" for the trans- 
form section. The second step begins with a main module 
which is used to control the transform. It takes in the 
data just produced, changes it, and outputs to the righe 
The center modules are constructed by starting at the 
efferent/transform boundary and moving left to make each 
module of the transform center. Data "b" is used to make 


data "c" and data "d", which together make data "e". Data 
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e is passed out to the right. The last step is to 
construct the modules which put or write the data. Here 
data "e" is formatted into data "f" before being written 
out.” [Ref 23: pp- 186=192] 

The concepts of "cohesion" and "coupling sheulagee 
considered while developing the data flow diagrams and 


structure chart: Cohesion is a measure of the functional 
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Figure 4.6 Data Flow Diagram and related Structure Chart 


strength of a module. A cohesive module does only one task 
inside a software procedure. If a module contains a group 
of procedures which must be done in order, it has sequential 


cohesion. If a module has procedures which must be executed 


in the same time span, it is called temporal Veonesiom 
Procedures grouped together without any relationship should 
be avoided by factoring them out into more modules. 
Although it is a relative measurement, high cohesion for 
each module is desired. Coupling measures the interconnec- 
tion among modules. The degree of coupling should be as low 
as possible. If an error needs to be corrected in one 


module, there is less "ripple effect" down through the rest 


of the modules. Low coupling results in a system that is 
easier to understand and easier to maintain. [Ref. 23: pee 
158-164] 


oe Coding and Testing 

Coding follows directly from the structure arm 
with good design, efficient code can be written faster and 
easier. The programmer should strive for code that is 
Simple and direct. The emphasis is on making it work in a 
straight forward manner, avoiding complicated conditional 
tests and heavily nested loops. It should be written so 
that the end user's work is minimized. Prompts for user 
inputs should be provided, especially if  undesireable 
results could occur like inadvertant erasure of a file or 
the reformatting of a disk. Each functional section of code 
should be identified by purpose, author, date, and if 
changes were added. The code itself should contain 
"remarks" to explain what each smaller section is doing. 

Testing of the coded module can be done in a number 
of ways. The bottom-up method starts by testing all of the 
lowest level modules. As these prove good, the next higher 
level of modules is tested with the lower modules attached. 
This method requires a "dummy" module at a higher level to 
initially call the lower modules. The top-down method tests 
the highest level module first by attaching "stubs" in place 
of lower modules. The stubs are then replaced with the 


actual modules and lower stubs are added for more testing 
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until the system has been "fully tested." The term "fully 


" A complex 


tested" means "as fully as reasonably possible. 
program can have thousands of possible data flows, some of 
which may not be exercised until the system has been put 
into operation. At that point, good design and thorough 
documentation are valuable tools in isolating the problem. 
4.  Phase-in Methods 

Ihe method of installing a new system can be a 
significant factor in its final success. Four strategies 
exist. The "plunge" method is the most dangerous in that 
the existing systems (possibly manual systems) are dropped 
when the new system is started. If a problem developes 
there is no backup to rely on. A better but more expensive 
way is to run both systems in "parallel" for a period of 
time. The "pilot" strategy puts a new system into a small 
part of the user base, which isolates any damage if the 
system does not work properly. The last method is to intro- 
duce the new system in "phases" into different areas of the 
organization. [Ref. 8: p. 111] A squadron with a new micro- 
computer system will probably find itself using each of 
these methods at certain times. The possibility of failures 


should be anticipated for any new system. 


See GOFLE AND COMPUTERS 
L. Stress 

The split-second accuracy and incredible speed of 
the computer expands the rapidity and capacity of what can 
be accomplished - but at a price. Brod | Ref. 25: pp%4ic-1I/]| 
uses the term "technostress" to describe the inability to 
cope with computer technology in a healthy manner. He 
breaks this down into technoanxious and technocentered 
personalities. The technoanxious person feels pressured by 
his managers, his peers, and the general culture to accept 
and use computers, but he finds the experience to be pain- 


fully slow and uncomfortable. The technocentered person is 
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highly motivated and eagerly accepts the new technology but 
exhibits a loss of capacity to relate to others. Insisting 
on speed and efficiency, he tends to isolate himself, losing 
patience with those who cannot keepaump His keyboard 
demands concentration and he developes an intolerance for 
any interruptions. 

Time, for all users, 1S compressed. The urge to de 
just one more calculation, or write just one more line of 
code, can use up:a whole morning as one action leads to 
another and a renewed promise to quit after the next try. 

Adapting to the new technology is stressful. The 
manager must remember that each person, including mimo cea 
will adjust and learn to use it at his own pace. Although 
production may depend on the rate of adaption, the system 
may never be used properly if it is forced on the user. 
Workloads must be lowered while the new tasks and procedures 
are being mastered. Constant monitoring and hovering over 
the new user will increase his anxieties. The manuals 
supplied with hardware and software are notoriously poor and 
make learning a new system even more tedious. A training 
program that adjusts to different learning rates and capa- 
bilities will provide the greatest return for the manager. 
[Ref. 26: pp. 43-48] 

The manager may find that some people view the new 
system as chance to strengthen their own position through 
what Brod calls the Star Game, the Ransom Game, and the 
Maintenance Game [Ref. 25: pp. 59-75]. 

Ihe Star Game is worked two ways. The player is a 
clever and aggressive upper level employee who will push for 
the biggest, fastest, and flashiest new peripheral or soft- 
ware package to keep himself highly visible, but with little 
planning or implementation forethought. The other variation 
is the middle manager who senses his supervisor's commitment 


to the new technology and quickly imposes unreasonable 
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scheduling and workload demands on his division so he 
appears to be supportive. 

The Ransom Game is the manipulation of time by 
employees. Traditional work slowdowns were obvious to a 
manager because be knew what the work entailed and how much 
time was required. A computer-naive manager will not be 
able to see this form of protest if he lacks understanding 
in what the tasks involve. If all he can see and understand 
is output, he does not know what efforts are required. 

The Maintenance Game is a familiar one played ina 
technical age. One person's knowledge is the key to keeping 
a particular system running. The person feels extra pres- 
tige and will often guard his knowledge to keep his position 
secure. With a microcomputer, the hardware and commercial 
software packages should be mastered by a core of people. 
More importantly, since organizations change, their require- 
ments will change ~ any specially written programs must be 
well documented so that maintenance can be performed even 
after the "expert" leaves. 

P XNEdonomics 

The comfort and well being of workers can greatly 
influence their productivity. Too often a new microcomputer 
is unwrapped and "installed" on the most convenient desk. 
The National Institute of Occupational Safely and Health 
(NIOSH) has identified a number of human factors that 
require special attention by the manager. The two main 
concerns are eye stress and neck strain. 

The video display terminal (VDT) is blamed for 
burning eyes, double or blurry vision, headaches, and 
general fatigue. While radiation hazards have been shown to 
be below normal background levels [Ref. &ws85: p. 35], the 
VDT still suffers from flickering, screen glare, and poorly 
formed characters, making it more difficult to read than 


paper documents. Constant refocusing from the screen to the 
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draft and back make the eye muscles work harder. If the 
pressure of a deadline is added, the pupils tend to dilaga 
and make convergence and close focusing even more difficult 
and therefore contributing to further eyestrain [Ref. 27: p. 
6]. 

A properly designed workstation can minimize these 
discomforts and lead to improved worker efficiency. The 
microcomputer screen should be positioned to minimize window 
and overhead light glare. NIOSH recommends that the screen 
be in the 10 to 40 degree cone below the user's horizontal 
eye height and 18 to 28 inches away. The keyboard should be 
about 23 to 27 inches from the Miss a normal 30-inch 
height desk 1s too high for comfortable typing. The manager 
should remember that people are not all the same size. 
Adjustable chairs and document holders will lessen back 
strain and enhance worker comfort and Products 
[Ref. 28: pp. 33,44] 


DT SECURTI? 

An organization which relies on a computer system is 
highly vulnerable if proper security measures are not in 
place. The most common type of problem is with software. 
The stored information on disks is subject to magnetic 
damage from ringing telephones, printer heads, magnetic 
document holders, and any other source of even weak magnetic 
influence. Physical damage to the floppy disks can be 
caused by bending or paper clipping the floppy's black 
jacket. The magnetic surface which shows through a small 
window can easily be scratched and even fingerprints can 
alter its readability. These problems can largely be elimi- 
nated by educating the users. 

Less easy to prevent are hardware problems and human 
Error. Although highly reliable, the disk drives and even 
the micro itself can fail. The hardware system is particu- 


larly sensitive to power fluctuations. Aboard ship these 
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can come with disturbing frequency, whether unplanned load 
dao Nna or routine Changing Of ship power to shore power. 
People can also cause problems with the hardware and the 
software. The designer may have overlooked something or the 
operator may have entered erroneous data. A Knowledgeable 
person may even purposely destroy data or sabotage hardware. 

The key to all these problems is an effective recovery 
method. For a microsystem this means backup copies of 
programs and data files, and storing them physically away 
from the original copies. It also means a good training 
program to reduce errors or oversights. Floppy disks with 
Privacy Act information must be protected and handled just 
like printed copies would be. Any classified material 
produced must be done on TEMPEST secure hardware and the 
file disks stored in an appropriate safe when not in use. 
COMNAVAIRPAC [Ref. 29] provides Piste tions | Wrens the 
security of office information systems and also offers a 


risk analysis guide for these assets. 
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V. CURRENT SQUADRON USAGE OF MICROCOMPUTERS 





A. “MICROCOMPUTER Sui a 
The survey used in this research was intended to gauge 
current levels of Zenith 120 usage and to identify specific 
requests for application areas which would improve organiza- 
tional efficiency. The three part survey was mailed in 
December 1985 to the twenty-four squadrons under Commander, 
Anti-Submarine Warfare Wing, Pacific. Eighty percent of the 
squadrons returned at least one of the forms. Appendix A is 
the survey. 
1.  CO/XO Questionnaire 
The form used for the Commanding and Executive 
Officers was intended to provide a top level view of how 
successfully the microcomputers are being used, what infor- 
mation is desired for decision making, and perceived level 
of required system knowledge. The following highlights were 
extracted from the survey: 
a) Only two squadrons provide reports related to 
RM the Career Counselor, or the Command Master 


b) -Application Pis ne for maintenance and operations 
are most desired. 


c) Two-thirds of present computer reports are not in 
che desired format: 


d) The reports provide only about half of the desired 
information. 


e) Accuracy is increased, but time saved was question- 
able in one one-third of the responses. 


f) Thirty percent of the squadrons had no one holding 
cognizance over the system. Of those that did 
more than half indicated a lieutenant-commander or 
a lieutenant in charge. 


g) Only one squadron had an instruction written on the 
microsystem. 


h) Stress and frustration were caused by too few 
computers, lack of letter aua d printers, and 
large time investment for training and data entry. 

i) Two-thirds felt the supplied software was adequate. 


j) Two-thirds had developed specialized programs; only 
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three squadrons had requested outside assistance. 


k) An average of five officers and six to seven of the 
enli ted in each Unit knew mow to use the micro, but 
two ee ons had only one or two people who could 
use it. 


l) Five of the twenty-six C.O.s and X.O.s who responded 
could personally wse the system. 


m) Of those who couldn't use the micro, thirteen did 
Po intend to learn, Dut felt they knew enough to 
get desired information. 


n) Eighty-five percent of the squadrons desired more 
microcomputer systems. 


o) Executive officers tended to know more about the 
micro than their C.O. s did 


The need for more computers and better quality 


printers were the two most common requests concerning hard- 


ware, although some C.O.s recognized a need for increased 
RAM to run more sophisticated programs like spelling 
checkers. 


O£ the C.O. s and X.O.s who did not plan to learn how 
to use the micro, all said they did not need to know that 
much detail to get the information they desired. Of the 
eight who did plan to learn the system, five felt they did 
not know enough now to ask the right questions. 


2. User Ouestionnaire 





Ihe User Questionnaire was designed to get amore 
detailed picture of how well the microcomputer had been 
incorporated as an information system. At the time of the 
December 1985 survey, the average squadron had owned a 
microsystem for seven months, although two had owned theirs 
only one month. The experience level of responding users 
ranged from none to over three years on various mainframe 
systems. The following list summarizes user's responses: 

a) Most felt it was easy to use, but somewhat slow and 
limited in memory. 
b) The supplied software was considered useful. 


BO Satisfaction with m training varied widely, 
but most stated that more was needed. 


d) Mean weekly system usage was twenty-three hours, 
but with a standard deviation of twelve hours. 
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e) WordStar was considered to be easy to use and very 
helpful for general correspondence. 


f) Nine squadrons did not use any data base management 
program. 


g) Eight squadrons reported not using any spread sheet 
program. 


h) Only eight squadrons had at least ninety percent of 
their programs and data backed up. 


Hardware problems were noted by squadrons which 
deploy. The system is difficult to move aboard ship. Lhe 
CRT packing box is too large to fit through some of tne 
hatches and damage occurs if they are moved without the 
boxes. The system picks up oil and dirt faster aboard ship, 
and there is no repair facility for the equipment while 
deployed. Detachments are not outfitted with a system when 
deploying and have difficulty gaining access to the ship's 
system. All record keeping must be done manually, even by 
those detachments which had been using the parent squadron's 
microcomputer before deploying. 

User comments agreed with the C.O. and X.O. state- 
ments that additional computers and letter quality printers 


are needed. 


B. MICROSYSTEM SOFTWARE 
li: Programs in Use 
The survey identified a number of  sguadrons which 
have developed useful programs and applications that could 
be adapted by other commands with similar needs. The best 
of these programs are described below. 


HSL-31 uses a menu driven dBase II program to keep 


track of pilot and aircrew qualification: This program 
provides a hard copy listing by individual name, the quali- 
fication; and its expiration date. It allows on-line 


updates to the data base with a separate set of menu selec- 
tions. A similar program keeps track of current flight 
charts (sectionals, approach plates, SIDs, etc.) and also 


keeps track of the contents of each navigation bag to ensure 
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TABLE II 
CO QUESTIONNAIRE SUMMARY 


zenith generated reports from: 


eee ae SMC Yes 08% 

Yes 38% 
nino Yes S 
NATOPS Yes 08% 
Maint. Yes 39 


Aea which could benefit thẹ most A, HE NOS ue er pe I 
Bomuin: 08% Ops: 77% Training: 237 SE Maint: 697 


Computer generated information in the format desired: 
Yes: 54% Somewhat: 15% O: UA 


Does it provide the information you need? 
Yes: 46% No: 54% 


Does the Zenith help the squadron 2 increasing accuracy? 
Yes: 70% Somewhat: 15% Ou dd 


Does it always save Eos 
Yes: 5475 No: 46% 


Do ignated Eme holos, cognizance over the system: 
ERU rank: SIDE: ° AUS 

LT to CWO: 4% 

E-7 and below: 169 


Published instruction: Yes: 8% 


Baeacators of stress or frustration: 
-Too few micros 
-Time wasted waiting for computer 
-No letter quality printer 


Adequate software for needs: Yes: 62% No: 3327, 


Squadron developed any specialized software? Yes: 617% 
Areas: Flight proficiency matrix, OPTAR tracking, PM 


Outside assistance requested: Mes: 237 
Areas: 3M reporting, Det assignments, Engine tracking 


Officers in the s uadron who "know" the system: 
Mean: 4.3 elie Soe 
Trained in house: Aii ¡A Or 2 per squadron, however 
some squadrons had no outside training. 


Training cycle for teaching the system: Yes: 23% 


Dom vou Pucca ly noe gov to use the Zenith 120 with: 
Wordstar es 


dBASE II Yes: E 
Lotus 123 Yes: 
If no, do you plan to learn any of them: Yes: 23% 


CO/XO level needs to know this degree of detail: Yes: 15% 
Know enough to ask the right questions: Yes: 77% 


Additional microsystem needed: Yes: 92% 
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TAB eee 
XO QUESTIONNAIRE SUMMARY 


zenith genere cm reports from: 


čdmin/ ee / SME yes 14% 
OFS Yes 50% 
Training Yes 647 
NATOPS Yes 21% 
Maint. Yes 50% 


Area which could benefit the most E using the Zenith: 
Admin: 20% Ops: 40% Training: 4724  NATOPS: TX Malzlnt: ee 


SB ee genr raten o in the format desired: 


53% No: 47% 


Does it proyide the information you need? 
Y 53 No: 47% 


CS: y^ 
Does the Zenith help the squadron i increasing accuracy? 
Yes: 86% Somewhat: 7% OUT 
Does it always save time? 
Yes: 53 No: 47% 
i E 759750? holds cognizance over the system: 
Ye DIM 
Eccc “CDR: ae 


LT to CWO: 4% 
E-7 and below: 16% 


Published instruction: eS €e 
Indicators of stress or frustration: 

-Limited programs 

-Spead sheet not used to best advantage 
Adequate software for needs: Yes: 62% Nor saj 


Squadron developed any specialized software? yes: 617 
Areas: Flight proficiency matrix; OPTARTCrac RI] 


Outside assistance requested: Yes: 23% 
Areas: 3M reporting, Det assignments, Engine tracking 


Officers in the s uadron who "know" the system: 
Mean: 43 EID 
Trained in house: All but l or 2 Bee squadron, however 
some squadrons had no outside trainings 
Training cycle for teaching the system: Yes: 23% 


Do you SN know how to use the Zenith 120 with: 
es: 2 


Wordstar S: 
dBASE II Yes: 8 
Lotus 123 Yes: 28% 
If no, do you plan to learn any of them: Yes: 38% 


CO/XO level needs to know this degree of detail: Yes: 20% 
Know enough to ask the right questions: Yes: 80% 


Additional microsystem needed: Yes: 80% 
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TABLE IV 
USER QUESTIONNAIRE SUMMARY 


Memeis squadron has had Zenith 120: Mean: 6.5  5.D.: 


Months personally used system: Hean: MGS TS D.: 3.1 
Or computer experience: 
None: 247 
Reme computer: Se 
Word Prossessor: 19% 
Mini: 9% 
Mainframe: 27, 
Regarding the Zenith system: 
strongly strongly no. 
SEES OK agree opinion 
Easy to use 2% 21% 47% - - 
fast enough Te a 26% ae = 
enough memory I6 267 Me zj 21% - 
useful software Se 265 42% 11% - - 
good training by NARDAC 5% 26% 16% 2 ANA 
Hours per week system used: Mean: 23 SIDEN I2 


Formal method to equitably share the system: Yes: 16% 


Regarding Wordstar: 
Ease of learning: pie & 74% bike icuTU? 26, 
do you now feel o able using it: Yes: 79% 
usefulness: Very: 


ea, Ga cumbersome: MA 
Mixed opinion: 


If not used, what word processor is used: Xerox (1 unit) 


Regarding Data Base eee ce Sites gad 
program used: dBase II: 
logus m» i 
None: 
what divisions use it: 32% etic, tee 16% Operations 
for what: OA analysis, Flight d data, rough reports, pilot 
guals, OPTAR, IMRL, ROT management. 


Common data bases used by different divisions: Yes: 5% 
Is the DB used in query language only: Yes: 39% 
Automated ("one-button") programs used: 21% 


Information handled: CAL, IMRL, inventory, Flight data, 
OPTAR, pilot quals. 


Regarding spreadsheet EGO pams. 
Program used: Lotus : 38% 
None: ^ A29 


Used for: 3M summary, End-of-month sae Ye Plone 
hours, rosters, pilot/aircrew quals, scheduling. 


lee of the programs and data "backed-up": 


0%: 7 of 19 squadrons 
909: 2 of 1 
257: 2 of 19 
807: 2 of 19 
BO: 4 of 19 
40%: 1 of 19 
20%: 1 of 19 
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TABLE IV 
USER QUESTIONNAIRE (cont'd. ) 


For VS/HS, difficulties in taking the system aboard ship: 
= difficultéto move aboabdeshlpa 
= vibration of DTE damages printer 

no repair capability aboard shi 

CRT wom, eG fa Teco some hatches 

systems get oily and dirty faster 


For HC/LAMPS, do the Dets use the ship's system while 
deployed? Ship s system is different. 


Please list any commercial programs the sguadron uses yla 
NEUE ROE supplied with the system package: 
one 


If you could obtain a custom program for one division, was 
capabilities would it provide: 


- flight time ne Rar el by category, qual, training 
needed, percent of training achieved. 

Program to tie all operations and maintenance data 
Oger he a alas. 

Engine efficiency tracking: 

Elilght scheduling Pa l 

Pilot and aircrew flight hours tracking: 

NATOPS INFORMACION 

e a E tracking ( schools, PARSI: 
valuations. 

Track leave, PRD, EAOS (graph by member) 
Integrated data base/decision Suppo pi system. 
for flight schedule and flight hour vaccouncing 

Maintenance training schedule. 
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Pomon o Cation is out of date. An auxiliary menu prints a 
išči Mol Sguadron officers by lineal number. Lotus 123 is 
used to keep track of Fleet Replacement Pilot (FRP) and 
Aircrew (FRAC) training progress. The spread sheet quickly 
provides a summary sheet of grades and the student's final 
peerage for inclusion in his training jacket. WordStar is 
used to produce the smooth flight schedule. Py Simpi rfying 
the input of new names and events, approximately two man 
hours per day is being saved. 

VS-41 uses a menu driven dBase II program to keep 
track of squadron OPTAR funds. The easy to use program 
presents a menu for adding new items, changing present or 
past quarter items, deleting items, editing allocations, and 
printing out a finished summary. 

HC-11 uses Lotus 123 to keep track of pilots and 


alrcrewmen. Ihe template lists the individual,  detachment 
assignment, and required qualifications with the date 
completed. The user can then easily sort by individual to 


show his current qualifications or sort by detachment’ to 
indicate that unit's overall readiness level. Wordstar 
files are used to hold listings of schools and convening 
dates. The appropriate listing is attached to monthly divi- 
Sion officer memos to indicate what school openings are 
available. 

HC-1 makes use of dBase II to Keep track of H-53 and 
H-3 high-time components. This is printed on a weekly basis 
for the maintenance officer for planning aircraft avail- 
ability. A maintenance personnel listing is used to provide 
the names of who is attending school, on leave, SIQ, and 
other manning level information. 

HS-4 maintains ASW qualifications on Lotus 123. By 
making use of the built-in calender function, a monthly 
listing is generated showing the pilots and aircrewmen and 


what events they need to requalify in. 
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HS-2 tracks pilot qualifications using dBase MM 
Qualification expiration dates are displayed using the index 
function and then listed by indice Lotus 123 is used 
to print end-of-the-month flight time summaries. 

HSL-43 maintains detachment personnel and training 
levels with a menu driven deaces 1) EOS This program 
can quickly show the readiness level of a selected detach- 
ment and indicates which schools or qualifications are still 
to be completed. 

2. Desired Programs 

The survey also pointed out a need for application 
programs in a number of areas. An integrated data base/ 
decision support system for flight scheduling and flight 
hour accounting was the most common type of program sought. 
The need for maintenance department programs was also 
common. Supply parts tracking, NORS listings, ground 
training, engine efficiency trends, and quality assurance 
programs were requested in this area. The need for adminis- 
trative tracking of personnel on detachment, on leave, their 


rotation date and EAOS was indicated in the survey. 


C. NARDAC SERVICES 

The Naval Data Automation Command coordinates a world- 
wide effort to improve information technology within the 
Navy. Through twelve regional subcommands, data processing 
services, hardware and software evaluations, and system 
development projects are conducted. These regional NARDACs 


also provide specialized training for other Navy commands. 


NARDAC, North Island has recently launched a series of 
classes on microcomputers and specific applications 
programs. Since NARDAC works under a full charge-back 
accounting system, typical one-day WordStar or dBase Il 


classes cost the squadron about $95 per day for each student 
sent. This specialized training provides a solid foundation 


in the particular software application and permits the 
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individual to carry this knowledge back to the squadron and 
in turn train other members of the command. 

Although a complete systems analysis and implementation 
capability exists with the NARDAC, typical development costs 
erun over $50,000. An extremely economical alternative 
exists however, since previously developed software is 
available on disk with full documentation for $100 per 


application. 
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VI. CONCLUSIONS AND RECOMMENDATIONS 


Information gathered on the current usage of microcom- 
puters by Navy commands indicates that although pockets of 
effective management exist, most commands do not yet possess 
the expertise needed to fully utilize their microcomputer 
systems. Training for individual users is a key factor in 
improving computer usage, but there is also a need for upper 
level managers to not only understand the capabilities of 
the micro, but to also understand how the larger system of 
the command can integrate these capabilities to enhance the 
efficiency and effectiveness of the unit and ultimately 


improve its overall readiness. 


A. RECOMMENDATIONS 
l. Command Level 

The commanding officer should deal with the micro- 
computer system from an educated, overall viewpoint. He 
must assess the micro's capabilities in relation to the 
spectrum of needs within his command and the external 
demands on the command. Training for his personnel is 
essential to fully utilize the system. The NARDAC courses 
offer a good foundation, but more detailed instruction for 
each application package must be made available. Formal 
training within the squadron should then transfer this 
knowledge to more individuals. The training should be 
geared to the abilities of the individual. 

If specialized software is to be developed within a 
command, the commanding officer should insist on a method- 
ology or established life-cycle considerations. 
Documentation throughout the process is essential for main- 
tainable products. It also ensures software that can be 


transported to other similar need areas, both within the 
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command and to outside users. Those developing the software 


should not be reinventing the wheel. Commodore Grace Hopper 
sald: 
Wie start from scratchywwith ever Single program you 
write? Develop one that I o a lot of basic work 
over and over again for you. [Ref. 30: p. 45] 


A committee composed of Knowledgeable members from 
each department should be established in the command. This 
group would evaluate departmental software requests and 
coordinate the development efforts of this application soft- 
ware. They would investigate outside sources for similar 
packages, ensure the project has overall benefits for the 
command, and Keep standardization consistent in areas like 
data structures. 

The physical environment for individual users should 
be made as pleasant as possible. System placement in rela- 
tion to chair/desk height and lighting conditions needs to 
be evaluated. Apprehension over the new technology should 
be addressed. 

Computer systems fail. A strict back-up procedure 
should be in place so that hardware or software problems 
produce a minimum impact. 

P Training 
Adequate training provides the skills needed to gain 


maximum benefit from the microcomputer system. In addition 
to the basic and application courses, specialized program- 
ming should be made available. This would cover the 


complete systems analysis approach and thus provide indi- 
vidual commands with "resident experts" who could skillfully 
guide package development from within house. The program- 
ming language for dBase II or dBase III should be offered, 
as well as the use of prototyping tools like NARDAC's DB2GEN 


which speeds up program development. 
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3. Application Programs 

The level of success of ENG Mmiecroconeucess.) vie 
depend to a large degree on the sharing among users. User 
groups and a central software library are recommended. A 
user group provides a vehicle for expanding computer usage 
by making the expertise of the group more readily available. 
It encourages experimentation and exposes the members to 
more ideas for new applications. It also tends to draw more 
people in to the knowledgeable user's circle. The Zenith 
Company runs a users group that may provide useful informa- 
tion and programs. Membership is available from the company 
at Hilltop Road, Saint Joseph, Missouri, 49085. The Wing 
and Type Commander levels should maintain a "resident 
expert" list of people who are especially skilled so that 
their talent can be used by other commands. 

These two echelons should also establish a software 
Aiea yy including full documentation» containing Waa 
programs being used in the subordinate commands. Since the 
Air Force also purchased the same hardware/software package, 
this library could be enhanced if 1t included applications 
from that service as well. The Air Force is . presently 
publishing a listing of certified software being used by 


their commands. 


The following publications would also be a useful 
part of the library: 
- Government Computer News 
GCN Communications Corporation 
1060 Eltonfrosd 
Silver Spring, MO 20703 
(A weekly newspaper format with computer related 
articles in government and industry.) 
- C2MUG Bulletin 
Chief, CECOM 
Attn: AMSEL-FL-SDSD (C2MUG) 
Fort Leavenworth, KS 66027-5600 
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(A 12-page monthly flyer with hardware and 
software articles and software catalog, 
including Zenith. ) 
- Chips Ahoy 
NAVDAC 
Washington; D. C. 
(A monthly bulletin with Navy related computer 
information and reviews. ) 
4. Upgrades 
The microcomputer systems supplied to fleet squad- 
rons were part of a standard configuration purchase by the 
Navy. To improve the usefulness of the systems, the 
following upgrades are recommended: 


a) Increase the RAM available to at least 512K and 
ideally to 768K. 


b) Procure a compatible spelling checker that will work 
across different word processors, spread sheets, and 
data base programs. 

c) Replace dBase II with dBase III. The newer version 
can keep more than two index files open, accomodate 
more and larger files, and runs faster. 


d) Letter gas cc enters should be included in the 
standard outfitting package. 


e) A smart MODEM should also be included. 


f) One hard disk drive system should be available to 
each squadron. 


g) A local area network system should be investigated 

NE iL conc ono can make use of common software 

This paper is aimed specifically at a squadron 
commanding officer, but most points are applicable to any 
manager who must rely on computers to assist him in getting 
the most out of his assets. Many of these managers received 
their training and matured ina world without benefit of 
microcomputers. In recent years the explosive proliferation 
of micro availability demands that the manager understand 
their capabilities. If the technology is poorly used, the 


machine's capabilities are wasted and so are the worker's. 
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The paper is designed to provide executive level managers 
with the elementary tools needed to understand how computers 
work, what makes up a computer system, how to effectively 
specify application requirements, and how to manage the 


whole system. 
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APPENDIX A 
MICROCOMPUTER SURVEY QUESTIONNAIRE 


The following three part survey was sent to all squad- 
rons under Commander, Anti-Submarine Warfare Wing, U. S. 
Pacific Fleet. As these units represent the widest variety 
under a single commander with 6 squadron types and 12 
aircraft models, it was felt these squadrons could provide 
the most accurate small sample look at the current usage of 


microcomputers in aviation squadrons. 
IME COVER LETTER 


16 December 1985 


From: Cdr M. W. Skahan 
SMC 1724 
Naval Postgraduate School 
Monterey, CA 93943 


TO: Sommanding officer, xxxx 
Subj: Zenith 120 Computer Applications 


Encl: (1) and (2) CO/XO Questionnaire 


(3) User Questionnaire 


EE 1995, an a joint 530 million contract with the U. S. 
Air Force, the Navy started purchasing the Z-100 series 
microcomputer in order to equip all commands with a desktop 
computer. Hardware and limited software was distributed as 
part of the vasic package, but validated applications 
software was left to individual users. The enclosed 
questionnaires are part of a research effort to provide 
better, more useful software programs and improved methods 


of managing these microcomputer assets. 


zel 


2: Xxxx's help in filling out the enclosed questionnaires 
wilg provide fleet squadrons with more productive 


application programs and systems management. 


3. Please complete enclosure (1) and have your XO complete 
enclosure (2). The third part of the survey should be 
completed by the person, officer or enlisted, who you feel 
has the most knowledge of the Zenith 120 system. 


4. Thank you for assisting in this survey. If you woulb 
like further information, I can be reached through the CSM 
office, NPS: (A) 878-2174 or (C) 408-646-2174. 


Very respectfully, 
M. W. Skahan 


2. "CO/XO QUESTIONNAIRE 
Date: 
Please Indicate your billet: CO" X0 


Are you now provided with Zenith generated reports from: 


Admin/ccc/cMC Yes No 
OFS Yes No 
Training Yes No 
NATOPS Yes No 
Maint. Yes No 


Which area, given the right software, could benefit the most 


by using the Zenith? 
Is the computer generated information you receive in the 
format you desire? 


Does it provide the information you need? 
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Does the Zenith help the squadron by increasing accuracy? 
Does it always save time? 


Have you designated anyone to hold cognizance over the 


system? Y N If yes, rate/rank? 


Do you have a published instruction on the use of the 


microcomputer system? Y N 


What indicators of stress or frustration have you noticed in 


regard to the system? 


Do you think the software provided was adequate for squadron 
needs? YN 


Has you squadron developed any specialized software? ZN 


If yes, what areas does it help? 


Have you requested outside help (Wing, NARDAC, etc.) for 
assistance in developing special software? Y N If yes, 


what areas? 


Approximately how many officers in the squadron "know" the 


system? and how many enlisted? 
Of these, how many were trained in house? 
Do you have a training cycle for teaching the system? Y N 


Do you personally know how to use the Zenith 120 with: 
Wordstar bi N 
dBASE II Y N 
Lotus 123 Y N 


memo, do you plan to learn any of them? 
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Do you feel CO/XO level needs to know this degree of detail 


on how the system works? 


Do you feel you know enough about the system to ask the 


right questions so the information you want can be provided? 


Would an additional microsystem improve your squadron's 


Productivity- 


Other comments, positive or negative, regarding the Zenith 


120 microcomputer system: 


3. USER QUESTIONNAIRE 

Date: Rate/Rank: 

Approx date squadron received Zenith 120: 

Number of months you personally have used system: 
Prior computer experience 


system(s): 


Months used: 


Fill in the next two lines only if C.O. desires feedback on 
this survey. 
Name: 


Organization: 
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Regarding the Zenith system: 


strongly S Lona y no 
agree OK agree Bead On 
Easy to use ie 2 3 — 5 6 
fast enough 1 2 S i 5 6 
enough memory | z 3 + 5 6 
useful software X 2 3 d 5 6 
Bood training by NARDAC 1 2 3 i 5 6 


How many hours per week is the system used? 


Is there a formal method used to equitably share the system 


among all divisions? 


Regarding Wordstar: 
if used, ease of learning: 
do you now feel comfortable using it: 


usefulness: 


If not used, what word processor is used? 


Regarding Data Base Management programs: 
program used: 
what divisions use it? 


for what? 


Are common data bases being used by different divisions? Y 
N 


Is the DB used in query language only? (ie: .list for name 
= "SMITH" ) Nt N 


Does the squadron use any automated programs ( "one-button" 


inputs) to run the database program? Y N 


zo 


If yes, who wrote it? 


What information is handled? 


Regarding spreadsheet programs: 
If used, what program? 


Division( s) wnich use It: 

What do they use it for?: 
Approximately what percentage of the programs and data in 
the squadron are "backed-up"? 
For VS/HS, has the squadron experienced any difficulties in 


taking the system aboard ship? What? 


For HC/LAMPS, do the Dets use the ship's system while 
deployed? Any problems? 


Please list any commercial programs the squadron uses which 


were not supplied with the system package: 


If you could obtain a custom program for one division, what 


capabilities would it provide? 
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APPENDIA E 
SAMPLE DBASE II PERSONNEL MANAGEMENT PROGRAM 


Modu L ea Flow Control 


L 
(arent aun mos 
it 
12. 


> 


2 y 





picqure B Module Elow Control 


7] 


This shows the overall stucture and control “of ene 
program. A major decision point is located in Module MN 
separate enlisted from officer data. Also note the avail- 
able on-line help in Modules 10 and 24 when adding 


personnel. 


1. PROGRAM LISTING 
This program may be copied in part or entirely for us 


as desired. 


desee se e dee se sese ve ue se eise kkkkkkkkkkkkk 
ERAERKEREXKARKKRA*S% Personnel Management System de dedecus. 
A a a a a a a Written for use on EXRARREARAERA RR 
REXARERAEARAERKERRA Zenith 120 computers. RAKE KR ee 
IITIITIIITIITIII kkkkkkkkkkkkk 
k Ak 

xa This program was written for use by fleet squadrons 

es which were outfitted with the Zenith 120 computer. 

* Output Is top inter: Doc deleteing, and changing 
SS data does not require a printer 


* 
**Module 1 *** GREET.PRG *******X****** 


* GREETING SCREEN 
* Author: M.W. Skahan 
* Date: JAN 86 
* E ee user With choice of options 
ii process enlisted or officer data 
p C Ee NKKARREAKEKNEANIKAKKANKAEAKRK EX MAR 
CLEAR 
SET TALK OFE 
OEL INIEN TITT? OLF 
GE DELPELCSOFE 
ERASE ; ; 
@ 17 26r say Mc CM , 
@ 2,loVsay OPE IL CEFR E N LM? 5 TREED 
* NOTE: Some lines in this program have been split due to 
% limits on line Vengrua Ing Eni S Si MI Printout 
* When entered into a micro, they should be typed on 
* a single soon column line. The next line is an example. 
Qu say Pek foe VRED MANAGEMENT 
> L S TIRIM i 
E 4,2/ say ver, 1.5 
E 


DOT program allows additions, deletions, and changes 
to Officer: 
Dare enlisted personnel data. The output is to a 
_Ppinter and 
is menu driven for a total of 12 dittrereni mori" 
A help screen" 
zi iS aval lobie eect the 'ADD RECORD' P 
STORE =- TO driver 
DO RE ILE Mu E AND. !(driverj X 
STORE : POERI 
OMOLO LAT PLEASE "ENTER THE LETTER eee 
IDENTIFIES THE 
@ 18,10 SAY DISK ie CONTAINING DATA FILES' 
S driver PICTURE 


ENDDO 
STORE ' ' TO loopit 
DO METER Loop uE 
STORE driver+'enlisted' TO enl 
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STORE A Ert. 
MEET LE ‘> &enl' 
STORE X' T 
RELEASE enl, 
ELSE 


ERASE 
a 12,10 SAY 


Ore Renee ia TOO fr 
Je AND MEILE ( 
O loopit 
OLER 


COLL”) 


, FILES ENLISTED. DRE and OFETCER. DEE 


ARE NOT ALL, 


@ 14,10 SAY 


"PRESENT ON TRE DRIVE, INDICATED. 


PLEASE CHECK. 


@ 20,0 SAY 
WATT 


DO WHILE T 
E 


pa 
La 
D 
K 


N N N N NNN N N d» JH 


sj Js Js pp ps ps 
~J 


O 
EO Oe eee Re ee eee OE SOU OE NR ae 


SAY " 
OT SAy * 

© SAY " 

OF Ay" 

TO select 
E 
E 


S o EOR E o o AA 


HTEBEINNROS + SANOS A A A OOOO OA OA A AA A AA ON OMM OM NOR 


" " TO s 


O 
35 ee ^ 
48 GET se 


D 
STORE VAL( sele 
NDDO 


+ 


O 
O 
6 
8 
O 
O 
O 
8 
O 
8 
O 
8 
O 
8 
O 
8 
O 
8 
O 
E SAY 1! t" 
8 
O 
8 
O 
8 
O 
O 
O 
O 
O 
O 
O 
l 
1 
1 
3 
L 
3 
S, 
S. 


PH EBOH - S S TS 


DO CASE 
CASE selectnum 
CET COLON O 
SET TRBELL ON 
SET TALK ON 
CLEAR 


'PRESS <RESET+CTRL> together to continue. ' 


CUIT co DOS K 


or 
DAL vide ENLISTED PROGRAMS 2. OFFICER PROGRAMS" 


Squadron Roster List by Ranks" 
Senor cy list Recall Bill? 
security Clearan security Clearances’ 
Recall Bill UPDATE data base" 
Manpower Listing" 

UPDATE data base" 

num 


selectnum « O .OR. selectnum > 2 


elect 


select T 


lect PI ous ap it 


ct) TO selectnum 


= 0 
N 
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DO-OUTE 

CASE selectnum= 1 

* DO the enlisted programs 
DO MAINZ 

CASE selectnum= 2 
DO the officer programs 


DO MAINI 
Ce ee 


<a Sn 10 SAY CHR(7) + "INVALID ANSWER, USE OMIC 
ENDCASE 


STORE " " TO select 
Ga dn O SAY "Strike any key to continue... " GET select 
ENDDO p 


SEDE: CRESTAS 


Ackkck kk kk k kk k*x** MAINI. PRG *FFRXRARARARA 


* MAIN MENU for OFFICER PROGRAMS 

* Author: M.W. Skahan 

* Date: JAN 86 

* ne a user with Ra of options 
Pto pPOCCSSMOLEIPCCIMCUS 

due Ke ee ie ese hse A 
SET TALK OFF 

SET INTEN OII OFE 

SE eben OLE. 


ERASE 

draw the screen with choices 
DO WHILE T 
ERASE 


B 


SIH 
(MU) 
DD 
KK 

Hes 

mo 

Es 
Co 
Un 
O 
EH 
rj 
FA 
(2 
tx] 
JJ 
FU 
Ex] 
29 
U 
O 
Z, 
Zz 
tx] 
E: 
ra 
vs 
E 
O 
JO 
c 
D 
H 
Fa 
O 
z 
U 
K, 
Ul 
H 
E] 
= 


J loe us 
m MOOOOOOOOOOOOOOOOOOOOOOOOOOOONOOO 

U 

D 

K, 


~] 


“I~ 


— 


A Jj js fs ps js 
NSO JxO9oQ0-JOYUICOCObObO I2 O OUO)00000 --J0YOYUTUT HAS 0 0 NN IN PA 


HH cdt [1] »" "" """""" "NN NN NN NN NN NN NN NN GN GN 


exit to ENLISTED Programs or QUIT" 


I+ UYBemgremmmpemocU)tefemefremmrermemeremmmeremrmrmeremj emere) 


4 
2 O: 
20 SAYO 329950 E Ranks 
20 SAX z 2. SENT ne o 
20 SAY ".3. Récall 
20 SAY " a. UPDATE ata base. 

TO TO selectnum 

g process the selection 

O ii 5 selectnum < O .OR. selectnum > 4 

O "TO select 
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oMi? WoS SAY " select m = 
ale, 428 GET select PICTUR +! 


READ 
STORE VAL( select) TO selectnum 
ENDDO 


DO CASE 

CASE selectnu O 
*GO BACK TO GREETING MENU 
ERASE 
RETURN 

CASE selectnum= 1 

* DO list by ranks 
DOPOSENTO 

CASE selectnum= 2 
DO security listing 
DOSOSECURE 

CASE selectnum- 3 
WO officer recall bill 
DO ORECALL 

CASE selectnum= 4 

* DO the additions or updating 
DO UPDATE] 

OTHERWISE 
erase 
@ 7,10 SAY CHR(7) + "INVALID ANSWER, TRY O - 4" 

ENDCASE 


STORE " " TO select 

NS SAY "Strike any key to continue... " GET select 
ENDDO T 

EOF: MAINI. PRG 

kkkkkkkkkkkkkkk MAT PRG KEKKKKKEKKKKKK 


N2. 

MAIN MENU for ENLISTED PROGRAMS 
Author: M.W. Skahan 
Date: JAN 86 

Provides user with choice of options 

to process enlisted data 
za za za ae oe uw RERERREREEREKRAKKRKRKKAKARRERAAARRR 
SETE TALK OFE 
INTENSITY OFF 
T BELL OPF 


X 


Y Z N N $ JP $ 
OOODOODOOOOOOODODOOOODNOOO 

Ca 

D 

K 


Y JJ] N N 


" —-- YYY YNA YNNN S&S & Ss Ss Ss Ss NS. Ss Ss 8 


"EY O SN 
HH0 0 WwW00JIJDONUHS A DUNN DNA 


HEHE 
— 
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G 12, 0 SAY "||" 

(POSSE úl 

av US mo se a a 
@ 13 ; ZO SAY ======================================== 
@ 5,20 SAY 0. exit to OFEFICER, Programsko si 

@ 6,20 SAY " 1. Squadron Roster" 

( uU OE 2. Seniority List’ 

@ "8,20 SAY 3. ¡Security Clearancesy 

@ 9 20 SAY " 4. Seca er) 

a 10,20 SAY " 5. Manpower Listing, 

@ LEZO TSA Z SMEM mm data Dase 

STORE 7 TO selectnum 


*set echo on 
* set step on 
* set talk on 


DO WHILE selectnum « O .OR. selectnum > 6 
STORE " INO Se Moe E 
GA 12,33 SAY " select Kore) Po: 
@ 12,48 GET seleceu Plus mi! 


READ 
STORE VAL( select) TO selectnum 
ENDDO 


DO CASE 
CASE selectnum< 0 
“SET COLONSON 
“SET O BEDEEON 
*SET TALK ON 
erase 
CLEAR 
RETURN 
CASE selectnum= 1 
DO the squadron roster 
DO EROS TER 
CASE selectnum= 2 
DO enlisted seniority listing E-9 to E=1 
DOVTESENTOR 
CASE selectnum= 3 
* DO enlisted security listing 
DO ESECURE 
CASE selectnum= 4 
* DO enlisted recall bill 
DO ERECALL 
CASE selectnum= 5 
A “DO rotation date and loss date Tero? 
DO MANPOWER 
CASE selectnum= 6 
* DO the additiens or updating 
DO UFDATE2 
OTHERWISE 
ERAS 
Q 7,10 SAY CHR(7) * "INVALID ANSWER, TRY O - e" 
ENDCASE 


? 


tf 


STORE. TOvselect 

cee. SAY "Strike any key to continue... " GET select 
T5 

ENDDO 


T 
HEOR: MARINE? ERC 


RRERRERRRRKRRRERERE OSENIOR. PRG ž*žkžkkkkkkkkkkkk 


Z Officer Ol Fist 
+ CAMEO E: NM Skahan 
* Date: JAN 36 
* Allows d co Print ou. 
a listing o Officer ank 
FAR RR NR A EN n vene 


ELLAS 


BZ 


See TENSITY OFF 
zo PELL OBE 


ERASE 

IDDOSWHILDE T 

2 SAY ========================================!! 
SAY " T ive m SE EME ee ee " 
SAY n H 

SAY "Hs 85 OFFICERS by RANKS" 


DODAN 

P) 

HHU 

Fs ss nse N SSNS SN NSS NNN SRS NR SNS NSS ty 
J <I JI NN oDe NN 


~J 


— 


-1 i 
OO0O0000000000000000000000 
t) 
D 
ES 


HHHHHH 


Ss Will print a Ranking list! 

Seo Otc ice.s 16 the squadron. 
SAN Press the P E O PLING: , 
SAY "Any other key will return you to OFFICER Menu." 
' ' to answer 
,/ get answer 


MUU 
UN 
Ma 
K 


H 
O 
5 00D 10 00 OY Ui EAS ES E O O X00 00 00 1-10 OYUt Ut i COCO tO DO DO 


(e) UYeyeyerererermrmgrmegpermgmermmermgerrgrg) 


EAD 
ES Set) c up 
RETURN 
ENDIF 
STORE "P" to answer 
ERASE 
@ 10,0 SAY ' , Make sure your PRINTERs "ON LINE" light 
Sit, then 
a 12,0 SAY ' HIT ENTER' | 
5 14,0 SAY Or to QUIT NOW, press any other key. 


16,10 GET answer 
READ 
IF wees wer) <> "p" 
RETURN 
ENDIF 
ERASE 
SET PRINT ON 
EJECT 
Pu EDU 
T, HS-85 OFFICERS by RANKS' 
? i Rank Name SSN' 
SET PRINT OFF 


ERASE | 
MONO SAY | Now getting officer ranks...' 


STORE i Seo Zname 
STORE to ¿rank 


! i , to Zssn. 
EEORE drivert officer TO drivefile 
USE &drivefile 
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index on name to &lname 
use &drivefile index &lname 


GOTOTOP 
STORE QUO reru 
DO WHILE -not TEOR 
STORE name TO Zname 
STORE rank TO Zrank 
STORE ssn TO Zeon 
STORE TRIN cs TO Zrank 
IF Zrank - 
SET PRINT ON 
2 Zramnk, , aname, 
SET PRINT OFF 
STORE LO seine 
ENDIF 


AS A 


IF cnt = O 
SET PRINT ON 
No Commanders in Squadron 
SET PRINT OFF 
ENDIF 


GORO DOB 
DTORE IO CIE 
SEL, PRINTZON 


SET PRINT OFF 
DO WHILE NOC LoL 
STORE name TO zname 
STOPE rank LO. Aran 
STORE ssn TO assn 
STORE TRIM(! eeu) TO zrank 
IF Zrank = 
Sm PRINT ON 
AZ Faia FAME ccm 
SET PRINT OFF 
eee ivi Oven UE 


ENDDO 
juesenhum- Q 
SEL SPRINT ON 
NO CCDRS 1n Squadron. 
SET PRINT OFF 
ENDIE 


GOTO TOP 
STORE O TO CHLC 
SET PRINT ON 


SEI PRINT OBE 
DO WBILE : Not. EOF 
STORE name TO zname 
STORE Paa ae Zrank 
STORE ssn ássn 
STORE TRING! ( Zrank) TO Zrank 
IF Zrank = m 
SEL PRINT ON 
? Zrank,  Zname,' ',Zssn 
SETE RINDA EE 
DIE Emone 


CEIP 
ENDDO 
TE ener = Te 
SET DEUM DI 
o Lieutenants in Squadron' 
SET PRINT OFF 
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ENDIF 


GOTO TOP 
STORE O TO cnt 
SET PRINT ON 


SET PRINT OFF 
DO WHILE .not. EOF 
STOR name TO Zname 
STORE rank TO Zrank 
STORE ssn TO 2ssn 
Sons TRIM(! abd) moO Zrank 
IF zZzrank = 
SET ERINT ON 
a rank, , zname, ' 2ssn 
SET PRINT OFF 
-TORE | TO cnt 


cnt - 
SET PRINT ON | i ; 
No Lieutenants, Junior Grade in Squadron 
SET PRINT OFF 
ENDIF 


COTO TOR 
OLORE PATO ent 
SET PRINT ON 


SET PRINT OFF 

pe WHILE "not. EOF 
STORE name TO Zname 
STORE pom oa Zrank 


STORE ssn 2ssn 
STORE TRIN( | ( Zrank) ) TO Zrank 
IF Zrank = NS 

SET PRINT ON 

DE gap ' gname,' ',Zssn 


SET PRINT OFF 
SMODE MI LO cnt 
ENDIF 
SKIP 
ENDDO 
feewent = O 
SET PRINT ON 
o Ensigns in Sguadron' 
SET PRINT OFF 
ENDIF 


GOTO TOP 
STORE O TO cnt 
SET PRINT ON 

? 


Ser PRINT OFF 
WO WHILE .not. EOF 
STORE name TO Zname 
MORE rank IO Zrank 
STORE ssn IO Zssn 
SLORE A CAT RnR) TO Zrank 
IF Zrank = 
SEL PRINT ON 
p ZI mis aame, ',Zssn 
SET PRINT OFF 
STORE SITO "Ent 


S> 


SEL ELLE ON 
No Warrant Officers in Squadron! 
SET PRINT OFF 
ENDIF 


SET PRINT ON 
EJECT 
SED PRINT TOERE 
*to clear buffer 
RELEASE answer, zname, Zrank, Zssn, cnt 
RETURN 


ENDDO 
+ EOP: Com Ok wring 


RRERERÍRARARERE  OSECURE.PRGO ******RRARARRA 


Ge ecuri LS cing 
STOTT] o Ley ions 
* Author: M.W. Skahan 
‘ ace: 
* Dat JAN 86 
* dca e user to print eur 
* sting of Officer clearances 
e dr M RERNRAKKNRERKNRKRE REDKO APERERAAKE 
SETATALK ORF 
SET BELL OPP >T 
E 

DO WHILE T 
ERASE 
@ l1, O SAY ========================================" 
@ 1 ; 40 SAY Wee eS ee ee ee ee Se ee ee ee ee ee ee ee" 
@ Zz; O SAT niš 
@ T A 85 OFFICER CLEARANCES" 
O 2/78 SAY "|| 
S À ; n zu e 
O a O S am O 
JUE ql 
E SSA I 
(Qo SA aie 
AS A 
DO SA 
DATO SA ia 
@ G OSAT ee 
Q. 298 758 AT NM 
QN n E 
@ 9,78 SAY " a 
[EO OO e 
DO Vesa aah 
(ud dO SAY. Wi 
@ 11,78 SAY os , 
a 11 ; O SAY Wee ee ee SSS SS SS SSS SSS SS SS == 
@ il : 40 SAY " ZOO ODO. V UI — Ermin EN 
@ 5,5 SAY This will print a clearance iii pie 
@ 6,5 SAY “ “for officers in the squadron : 
(0085905 à Press the P key fo print. 
9 NE ,Any other key will return you 

O enu 
M RET face answer 

; ge answer 

EAD 

if e ee 
RETURN 

ENDIF 
STORE "P" to answer 
ERASE ' " " 
Q 10,0 SAY , Make sure your PRINTERS ,ONWEI NENA 

ls Ge then 
QZ Ons en HIT ENTER' 
Q 14,0 SAY ' Or to QUIT NOW, press any other key. 
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@ 16,10 GET answer 
READ | "n n 
IF Beate wee) ee 
ENDIF 
ERASE 
EET PRINT ON 
ECT 


DATE) 
HS-85 OFFICER CLEARANCES' 


' Rank Name SSN 
, Clearance 


SET PRINT OFF 


“y El 
e 


ERASE | | | 
a 5,0 SAY Now getting officer clearances... 
STORE ' ' to Zname 
STORE ' to Zrank 
STORE ' to Zssn, 
STORE ' tor ¿secc lr 


STORE driver+'officer' TO E 
USE &drivefile 

index on name to &lname 

use &drivefile index &lname 


GOTO TOP 
STORE O TO cnt 
MO WHILE .not. EOF 
STORE name TO zname 
STORE rank TO Zrank 
STORE ssn TO Zssn 
STORE secclr TO Zsece lr 
STORE TRIM(! aU C C Cr ROR CsecelyT 
IF Zsecclr = ELE 
SET Pe ON 


Zrank, 
ČET PRINT OFF 
TORET IT TO cnt 
NDIF 


SKIP 
ENDDO 
IF cnt = 
SIT PRINT ON 
No Top Secret Clearances' 
SET PRINT OFF 
ENDIF 


GOTO TOP 
STORE 0 TO cnt 
SET "BRIN ON 


SET PRINT OFF 
DO WHILE .not. EOF 
STORE name TO Zname 
STORE rank TO Zrank 
STORE ssn TO Zssn 
STORE seccir TO Zsecclr 
SLORE TRIM(! a 00 TO Zsecclr 
IF Zsecclr < SECRET 
SET PRINT ON 
REZANE, Me naneji a , zssn-! ' Zsecclr 
SET PRINT OFF 
STORE 1 TO cnt 
ENDIF 


SAn ane e ZSS, seca VE 
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SKIP 
ENDDO 
IF cnt = Q0 
SET_PRINT ON | 
PT lo Secret Clearances 
SET PRINT OFF 
ENDIF 


GOTO TOP 
STORE Ó TO cnt 
SET PRINT ON 


SET PRINT OFF 
DO WHILCE NOČEMO RE 
STORE name TO Zname 
STORE rank TOV Z rame 
STORE ssn TO Zssn 
STORE secclr TO'Zzseocclrt 
STORE TRIM(!(Zsecclir)) TO Zsecclr 


IP Zsecclr = ' CONFIDENTIAL] 
SET PRTI ON 
? Zrank, ¿name E "ZsecclB 


SET PRINT OFF 
eee POROD ENE 


IF cnt = O 
SET, PRINT ON 
o Confidential Clear ni ek 
SET * PRINT OFF 
ENDIF 


GOTO TOP 
STORE O TO cnt 
SET PRINT ON 

? 


SET PRINT OFF 
DO WHER. nora BOF 
STORE name TO Zname 
STORE rank TO Zrank 
STORE ssn TO Zssn 
STORE secclr TO Zsecclr 
STORE TRIM! O eee) TO Zsecclr 
IE Zsecclr = NONE. 
SET PRINT ON 
Ar a .Zname,' ',Zssn, 
SET PRINT OFF 
oa I- PORCHE 


: ,2secclr 


IF cent = 0 
SET -PRINT oh 


Ev 
SET PRIME OF 
DIE 


as has -a clearanceus 


SET PRINT ON 


EJECT 
SET PRINT OFF 
*to clear buffer 


RELEASE answer, Zname, Zrank, Zssn, Zsecclr,cnt 
RETURN 

ENDDO 

* EOF: OSECURE. PRG 


kkkkkkkkkkkkkkk ORECALL.PRE RAN x © = eee 
* Officer Recall Brr 
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Eor: M. W Skahan 

* Date: JAN 86 

we veeewouwUser to print out 

EM NM rtricer Recall Bill. 

oe e desee dedeuewedeue dese de de dee de dee ue E TE E 
pee TALK OFF 

REM INTENSITY OFF 

ET BELL OFF 


ERASE 
Bo WHILE T 
ERASE 


m JE a 


Y N 


Y å N N NN 


SAY 

SAY " This will print a RECALL BILL" 
SAY " for _all Officers in the squadron. 
SAY ae Press the P EM I INC. a 
SAY "Any other key will return you to OFFICER Menu. 
' ' to answer 
7 get answer 


~] 
OOODOOOOOOOOOODOODONDOOOODMOOO 

La 

D> 

K 


PA a 


001 01 0 AUR R4RP4SHO O Www 0 0-00 MUI HR 0 MN NN Ap 
ANNA A 


"Df NN NN NN NNNM NNN SN 


(e Ue eee fe Bee eere efe ee eee eere eC eee) 
O 


READ 
aes Meno Wer) <P 
RETURN 
END IE 
STORE "P" to answer 
ERASE | 
O 10,0 SAY ' , Make sure your PRINTERs "ON LINE" light 
MS E. then 
Go 12,0 SAY ' HIT ENTER' | 
@ 14,0 SAY Or to QUIT NOW, press any other key. 


Q 16,10 GET answer 

READ 

IF estate’) som opo 
RETURN 


ENDIE 

ERASE 

MENO SAY Now putting OFFICERS in alphabetical order... ' 
STORE drivert officer' to drivefile 

USE &drivefile 

INDEX ON name to &LNAME 

USE &drivefile INDEX &lname 

@ 10,0 SAY ' Now transferring to printer. 
REPORT FORM orecall TO PRINT 

RELEASE answer 

RETURN 

ENDDO 


MEČE ORECALL. PRG 
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kkkakkkkkkkkkkk UPDATE]. PRG KKRKRKKKKKEKKE 


UPDATE MENU for OFFICER PROGRAMS 

Author: M. W. Skahan 

Date: JAN 86 

Provides user with choice of options 
O update officer data 

de se tle Je se Je le Že le ole že te de de Je Re de je Je deck dedeck ste sle sle sle de sie sle sle sle sle le ske ske ke e ek 

SEME LI CORP 

SETSINTENSIT? ONE 

SET DELL OFF 


xoxo boob 


ERASE | | 
S ce screen with choices 
ERAS 
Q 1, O SAY "Seer ee ee ee ee ee eee Se Se Se SS Se See" 
@ 1 m 4O SAY Wee eee ee ee ee eee eee" 
oe Oe sy Ng ned” 
a e ae Go OFFICER DATA BASE UPDATE SELECTIONS" 
@ 3 F O SAY ========================================" 
@ 3 f 40 SAY NS ee eS Se SSS SSS SS SS eee ee ee ee eee eee ee" 
(o OR TENE 
o 4,78 SAY "||" 
ara, gun ne 
OS 7ST An 
OO, OSA Me 
uo SINE 
@ 7, O SRE > 
(c S SAYS 
ENS ON CM M 
a 8,78 SAY "||" 
@ 9, 0O SAri) 
(Qo OMS nM E 
(OP QE NE 
10 78 SAM q 
QUII OSA M E 
@ 11,78 SAY "Ion 
@ 12, 0 SAX Pipi 
O 12,78 SAY "|" z 
@ 13 : O SAY P —— À— ——— GA oi 
@ T3 p A SAY l======================================== 
@ 5,20 SAY "SO. exit to OFFICER Programs k 
G M6 JO Sim pP nov ole ni 
@) 7,20 SAT 2 ADELT an officer” 
@ 8,20 SAY "V 3. CHANGE an existing officer Meadas! 
STORE 4 TO selectnum 
* get & process the selection 
DO ee sele Se E OR. selectnum 3 
Se LEG 
@ 12,33 SAY " select 


Soe MT 
aid 48 GET select PICTUR i 


AD. 
STORE VAL(select) TO selectnum 
ENDDO 


DO CASE 
CASE selectnum- O 
* Go back to OFFICER MENU 
ERASE 
CLEAR 


RETURN 
CASE selectnum= 1 
Do the addition of a member 


DO OADD 

CASE selectnum= 2 
Do the deletion of a member 
DO ODELETE 

CASE selectnum= 3 


Ee 
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* Do a change to the data 
ih or 


DO OFI 
OTHERWISE 
er 
@ 2-10 SAY CHR 7) "INVALID ANSWER, TRY O - ca 
ENDCASE 
MORET". TO select 


@ 23,0 SAY "Strike any key to continue. 
READ. 


ENDDO T | 
DMEOLEM UPDATEL. PRCG (officers) 


" GET select 


A OADD. PRG %tkkkkkkkkaaax 


ADD OFFICER DATA 

Author: M.W. Skahan 

Date: JAN 86 

Allows user Ee add 
ficer dat 


Ho ox obo 


EET TALK OFF 

eat INTENSITY OFF 
SET BELL OFF 

store y to addmore 
ERASE 


@1,26 say 'HS - 8 

@ 2,22 say 'ADD D 

MS, 15 say 'OF FE IC 

STORE 'N' TO YESNO 

@ 6,8 SAY "Press the Y mov BO A 
an S lanation of the data field 


5 È 
ATA TO 4 
E 


NE AY "Otherwise just hit d ee bar. 


EAD [3 
F !(YESNO) = 'Y 
DO DATADICI 

ENDIF 


DO WHILE addmore 

ERASE 

STORE driver+'odummy' TO drivefile 
USE &drivefile 


@ 
SE GET YESNO 
I 


of 
he IVO R Ak ke kk k 


R Pes ko Onan E E: 


"n 


BENETE ALL 
PACK 
APPEND BLANK 
HN oO SAY ' HS-85' 
@ 2,0 SAY 'ADD NEW OFFICER DATA' 
GQ 4,0 SAY,'1. LAST NAME, FIRST NAME, MI ' GET name; 
ENGTURE '!tirrrrtrtrirfiri);rees! 
EDEN SAY 72. RANK." GET rank PICTURE '!!!!!!!^ 
@ 6,0 SAY 3. SSN GET ssn PICTURE EO tet ft ima a! 
@ 7,0 SAY '4. STREET GET street 
G TURE 'trrrrrttrgzvtrtsyegs vtri 
See eect CET City PICTURE 1111111111119 1140 
ORO sAY '6. STATE ' GET state PICTURE '!!!!!' 
OO SAY 17. ZIP ' GET zip PICTURE '!!!!!!!!1r' 
@ 11,0 SAY '8. HOME PHONE ' GET hphone 
ENSURE '1111111111r11r 
ome, O SAY '9. BUSINESS PHONE ' GET bphone 
PICTURE R ME 
@ 13,0 SAY SECURITY CLEARANCE '; 
CET cir, A Y 1! 
Q 14,0 SAY BO, ZONE 1 CET zone PICTURE '!!!!' 
MORE ' ' To = 
DO WHILE SET. 
STORE TO decide 
Q 23,25 EK ' MAIN MENU = CANCEĻ = C, 


PROCESS = P' GET decide PICTURE ! 


Sa 


READ 


IF e ee M' .OR. !(decide)='C' .OR. !(decide)='P' 
To loopit 
ENDIF 
ENDDO 
jemu decide a = slau | 
STORE driver+ “osticer TO dre Me 


USE &drivefile 

STORE drivert' EE TO addum 
APPEND FROM &addu 

@ 22,45 SAY “FUNCTION COMPLETED' 


STORE TO Moon 
DO WHILE ico LET : 
STORE ide 


@ GET SAT MAIN MENU |= C, PROCESE EME 


M, CANCEL = 
decide PICTURE a 


IB “(decid eg il: '(decide)z'C' .OR. t'(decide)- EN 
o docu 
ENDIF 
ENDDO i 
IF Bc = 'p! 
STORE Y TO addmore 
ELSE 
ORE N TO addmore 


ST 
ENDIF decide 
LSE 


STORE N TO addmore 
ENDIF decide 
ENDDO addmore 


PE ERDE addum, decide, loopit, addmore 


STORE sorivert officer =O idriveri je 
RETURN 
* BOF: OADD. PRG 


kREKRKKKREKEKKK  ODELETE.PRG **********x*x** 


~ DELETE OFRECER RECORDS 
: . W. Skahan 
JAN 86 
* Allows user to delete 
7) OTE Le ec OG Mer omili, 
RRRRERARRRERARRAR RARER RRR AS 
SET TALK OFF 
SEIT BELLE Ore 
ERASE 
STORE /. TO dropum 
DO-WHIEE dropum 
ERASE 
STORE drivert officer: 
USE &drivefile 
INDEX on name to &lname 
USE &drivefile index &lname 


base.. 
Je Je Je Je Je Je Je Je Je Je de SK 


TO drivel le 


(QM STEM HS-85' 

Q 2,0 SAY 'DELETE OFFICER FROM RECORDS' 
STORE ' ' TO member 
STORE ' "TO Z0 Me 
STORE : "LTO Zrank 

STORE TO assn, 

STORE | : TO raSEereču 
STORE TOTEM 

STORE i TO astate 

STORE | ITO AZID 

SIORE , TO Zhphone 

STORE ' To Zbphone 


OZ 


STORE ' "TORZS ecclr 


STORE ' WTo zzeje 


Ie say "To EXIT push ENTER PR ET. 
Dm mo SA7 "who do you want to DELETE ?'; 
ee nember PICTURE ra eri rifas 
READ 
IF member = 
RETURN 


ENDIE 
STORE TRIM(!(member)) to name 
FIND &NAME 


STORE # to recnum 
erase 
IP recnum = O ; 
Q 10,20 SAY 'That spelling NOT found, 
EENI2 15 SAY. try E 
A short ver wn like- SMI or SMITA 
@ 14,15 SAY 'is OK to use. 
ENIS.5 SAY HIT ANY KEY to continue. 
set console OFF 
WAIT 
set console ON 
ELSE 


STORE name TO Zname 
STORE rank TO Zrank 
STORE ssn TO Zssn 
MORE Stweee TO ¿street 
STORE ca ROTZCItY 

e 


STORE sta TO Zstate 
STORE ae TO EID 
STORE hphone TO Zhphone 


STORE bphone TO Zbphone 
STORE secclr TO Zsecclr 
STORE zone TO Zzone 


@ 1,0 SAY | pelo om DELETE PERSONNEL DATA' 
@ 3,0 SAY This will DELETE 
this person from the records. 
@ 6,0 SAY '1. NAME ' 
Q 6,9 SAY Zname 
@ 7,0 SAY '2. RANK ' 
@ 7,9 SAY Zrank 
@ 9g Dr E SSN ' 
; ssn 
@9,0 SAY '4. STREET ' 
I a 
Q 10,11 SAY Zcit 
UNIO SAY '6. STATE ' 
EE nns 
Q 12,11 SAY zzip 
@ e SAY '8. HOME PHONE ' 
Q a o Say nS a DSTNESS PHONE ' 
14,19 SAY Zbphone 
@ Ps O'SAY '10. SECURITY CLEARANCE ' 
@ 15,15 SAY Zsecclr 
@ ale d oe GEO. ZONE ' 
, zone 
a ooo m ae DELETE this person type "D"' 
oopi 
DO WHILE ep] v 
STORE ' ' bo, sleni 
ah 23,20 SAY OFFICER MENU = M, CANCEL = C, DELETE = D: 
cone GET decide 


OS 


1E decide Mih '(decide)-'C' .OB. !(decdde e 
STORE. X' TO Iaoi 
ENDIF 
ENDDO 
IF ideje. = 'D' 
EGE EE 
Pack SN | 
STORE , decide 
@ 22,12 SAY ‘FUNCTION COMPLETED: ' 
STORE TO loopit 
DO WHILE Loopit=' 
STORE TO decide 
@ 23,20 SAY 'UP DATE MENU = M, 
CANCEL = C, DO MORE = D' 


@ ADT 63 GET decide 
IF cm M' NE 


a 2)=1b 
TOR ' TO Vooplile 
ENDIF 
pe 


DDO 
DE OS 
ORE 7 To dropum 


ELSE 
STORE M TO dropum 
ENDIF decide 
ELSE 
OIORESON TO dropum 
ENDIF decide 
USE 
ENDDO dropum 
USE 
RELEASE dropum,member, loopit, decide 
RETURN 


SEDE: ODELETE ERG 


kkkkkkkkkkkkkkk  OFIXIT1.PRG ****kkk&kkkkkkk 


FIX OFFICER DATA 

Author: M. W. Skahan 

Date: JAN 86 

Allows user to change values in 
officer data 

ERAKAERRARARERRERERARERERARA RE RRA RERA RARA 

SET TALK OFF 

SEF INTENSITI OFF 


! (decide)='C 


EEEE 


SEBI BELI OFF 
ERASE 
STORE 0.20 Fechnum 
DO WHILE te 
ERASE 
Q 1,0 SAY E OFFICER DATA. 
STORE drivert officer TO DCN 


DOR Cartyertle 
index on name to &lname 
use &drivefile index &lname 


Q 1,0 SAY HS-85 
SAY 'CHANGE OFFICER DATA' 


Q 2,0 

SORE a. TO member 
STORE: ' TO Zname 
SLORE TO Zrank 

STORE , ' TO Zstreet 
STORE ! | TO zei 

STORE ' TO Zstate 

SORE TO zip 

STORE TO Zhphone 

STORE ` ' TO Zbphone 
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@ 9 
@ 
@ 
@ 


© 
(o2 Ore Or OF MH 


E 


STORE 
STORE 


GQmormeez say "To EXIT, 
@ ajo 
GET member PICTURE 


1 
1 


S 


On Azone 


"Who's data, ne 


AY 


DUSshe ENTER onl 


"IPO ZSecclr 


um 
eds update? 


8 NOČI 1 III 1 V II Or ! 


€ e ec o ov 80 e o o o o o o o Ò ò% Ò 9 8 @ 


ENDIE 
STORE TRIM(!(member)) to name 
FIND &NAME 


STORE # to recnum 
erase 
IF recnum = 0 


Q HO 3 SAY i Ihat spelli 
shortened version 
a I2, SAY mlake SMI fo 


@ 15,3 SAY 'To try again, Push any 
set console 


WAIT 
set console ON 


LSE 


SHORE 
STORE 
STORE 
STORE 
STORE 
STORE 
STORE 


4 


OFF 


name TO Zname 
rank TO Zrank 
ssn TO Zssn 


dor 
Sea 
Cie 
Sta 
Zl 
ho 


BON Zclor 

eet TO Zstreet 
Y nor Zcitv 

e TO Zstate 
ING) Paya at 


one TO SS 


bphone TO Zbphone 


SOC 


zone TO zzone 


SA 
SA 


ni 


clr TO Zseēccir 


ing NOT found, 


Ee Nue 
key. 


: HS-85 CHANGE OFFICER DATA' 
Mentes good, hit ENTER. 
To make CHANGE, 


over old entries and ENTER. 


si: 
get 


AY '2. 
get Zrank PICTURE 


dei Z 
@ 8,7 get Zssn PICTURE 


*dor etc. 


,O SA 
9 


Y 


' 4. 


LAST NAME FIRST NAME MI ' 


1, 


¿name PICTURE '! 
RANK ' 


SSN ' SAY ssn, 


STREET ' SAY Zs 


,il get Zstreet PICTURE 


Il 


S 

pu 

S 

ze 

9 S 
1 
S 
ji 


A 


ENCAY 5.. CITY .' 
Se oeget Zeity PICTURE `! 


Y 1 


SAY ZC 


Ç: 


6. STATE ' SAY Zs 


O get Zstate PICTURE 


A 


x "m 


get 


Y 1 
ge 


NAL. ' SAY 
ZZip PICIURE 


8. HOME PHONE ' 
t Zhphone PICTURE 


'9. BUSINESS PHONE 
t Zbphone PICTURE 


ray 


SAY ¿hphone 


SAY ¿name 


. 9 ec o ò ò> ò ò ò ò ò o òo ò ò ò ò ò  . e 


SAY Zrank 


pra? 


“ct 
x 
-0 
-( 
-c 


Dyyon "113.9 0110: 09111 9$117 


OM E 


* ec e ce eo ò ò o ò% o % o è a ò% °® 


trrrrrrret 


e è v 46 o ò ò o o o o e€ . e 


' SAY Zbphone 
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1 


GO 1570 SAY "107 °SEQURITY CLEARANCE ' SRYs 4ceee lr 
@ 15,23 get Zsecclr PICTURE 111111 ra 
@ 16,0 SAY 11: CEO MZ OEE Aa ¿zone 
a 16,14 get Zzone PICTURE '!!!!' 
READ 
IF Znamo = ' i 
RETURN 
ENDIF 
ERASE ; 
GO 2,0 SAY , Your new changes look like this 
@ 6,0 SAY ‘1. LAST NAME FIRST NAME MI 
@ 6,31 SAY Zname 
@ 7,0 SAY “2. RANK 
Gi 7, sae sa ¿Lana 
Q 8,0 SAY ‘3. een 
@ 8,31 SAY Zs 
*@ 11,30 SAY '0. DATE of RANK ' 
* @ 11,19 SAY Zdor | | 
@ 9,0 SAY 4. STREET 
Q 9,31 SAY Zstreet 
@ 10-0 SAY Sale my 
QUO OI nU M NUN 
O VV, O SAY 60, STATE 
@ 11,31 SAY Zstate 
12 Osama Ae 
@ ] 25 38) SAY dn 
Q 13,0 SAY '8. HOME 
Q 13,31 SAY Zhpho | 
Q 14,0 SAY '9. B SINESS PHONE 
Q 14,31 SAY zb pho 
Ga 15 0 SE Y "JO? ECURITY CLEARANCE ' 
A 15 SN SAY Zsecclr : 
aS Dio CHO ZONE 
Q 16,31 SAY Zzone 
STORE P tol we sno 
Q 22,5 SAY 'Are these correct (Y/N)?' 
(a READ 30 GET yesno 
IF Ten == 
R name WITH Zname 
REPLACE rank WITH Zrank 
REPLACE ssn WITH Zssn 
REPLACE S ErectWITHTAStrect 
REPLACE E WU EH ZU 
REPLACE state WlIH ¿state 
REPLACE zip WITH Beep 
REPLACE hphone WITH Zhphone 
REPLACE bphone WITH Zbphone 
REPLACE secclr WITH Zsecclr 
dd zone WITH Zzone 
RASE ; 
Q 5,12 SAY ' NO CHANGES MADE TO MEMBERs DATA 
@ 7,12 SAY 'Hit SPACE BAR to EDIT more or to QUIT' 
SET CONSOLE OFF 
WAIT 
SET CONSOLE ON 
ENDIF 
LOOP 
ENDDO 
LOOP E 
REOR Oti LEAD 


kkkkkkkkkkkkkkk 


EROSTER.PRG ****k***k*kx*&k*&kk 
* Enlisted Roster 


* Author: M.W.Skahan 
* Date: JAN 86 
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Os user to print out 

IND |pnabetized Roster of 

um squadron enlisted personnel. 

EIL oe coru eec eoe okokokokckokcokokokokokokok o kokok ko kk 
SET TALK OFF 

SET TENSITY OFF 


ET BELL 

ERASE 

ESSWHILE T 

ERAS z f 
@ 1 k O SAY iL La a ae o mmol 
@ 1 E 40 SAY ======================================== 

Q 2, 0 SAY IIL" E 

@ 2,15 SAY "HS-85 ENLISTED PERSONNEL ROSTER 
A E E X M " 
(Q 3 : O SAY y === ====================================" 
oe 4, O SAY "|{! 

Q 4,78 SAY "||" 

mes, O SAY "j|" 

ME 7S SAY || 

NS, O SAY " 

Q 6,78 SAY "||" 

EB. O Say "||! 

ENS, 78 SAY "||. 

fees, o say "||" 

o 8,78 SAY "| |! 

@ 9, O SAY "||" 

o 9,78 SAY "||" 

Q 10, 0 say "||" 

@ 10/78 SAY | 

Gil, O SAY " 

G 11,78 SAY "||" , 
a 11 ; O SAY a TOS ee 
@ 11 ; 40 SAY NE a a e ———————5—- 

EME 5 SAY This will print a ROSTER 1 
@ 6,5 SAY " for all enlisted personnel in the squadron. 
@ 8,5 SAY " Press the P ey to print. x 
@ 9,9 SAY "Any other key returns you to ENLISTED Menu. 
P ' ' to answer 


,7] get answer 

READ : 

Lf anver) <> "P 
RETURN 


PE 
STORE EEO answer 
Q 10,0 SAY ' , Make sure your PRINTERs "ON LINE" light 


then 
@ 12,0 Say ' HIT ENTER' | 
O 14,0 SAY ' Or to OUIT NOW, press any other key. 

@ 16,10 GET answer 
READ 


F aeenswer) NEU 
aN 


ERASE 

@ 5,0 SAY ' Now putting ENLISTED personnel 
in alphabetical order... 

MORE drivert enlisted to drivefile 

USE &drivefile 

INDEX ON name to &LNAME 

USE &drivefile INDEX &lname 

Seon O SAY Now transferring to printer. 

REPORT FORM eroster TO PRINT 

RELEASE answer 

RETURN 

ENDDO 

* EOF: EROSTER. PRG 


S 


kkkkkkkkkkkkkkk ERECALL. PROG X*k kk kkk kikkk 


* Enlisted Recall Bill 
* Author: M. W. Skahan 
* Date: JAN 86 
* Allows user to prin 
an Enlisted Recall 
wee rc ERR RRR EEK 
SET TALK ORE 
SOMA INES NS IO 
Se ous OFF 


E 


* 


+: 


out 
Bill. 
Je ee Je ke se ske ke de se se ee ske k ee ke k 


ERASE 

On Vel LHe 

ERASE 

@ Po O Say à ========================================"' 

@ a k 40 SAY ———————————————————————————————— — 

O. "2, 0 SAY d. 

@ 2/15 SAY "HS-85 ENLISTED PERSONNEL RECALL BILL" 

8 3/70 SAž na 

@ 3 z 40 SAY Yer eee eee eee eee ee ee ese" 

Oma, 0 Cave e 

a 4,78 SAY "||" 

us OS pa 

Qu 5 79 SAY "LES 

O? so; O SE SIV 

@. 16,738. shen 

O. 7; 0. SAY S 

@ SNNT 

@ 8, O SAY "||' 

@ 8,78 SAY "jı" 

O O o0 SN A 

o 9,78 SAY "||" 

@- 10, 0° SAY po 

@ 10,78 SAY “ont” 

@ 11, 0° SAV Sale 

@ 11,78 SAY “iar 

Q P E O SAY ========================================" 

a 11 7 40 SAY " SS SSS SSS SSS SS SS SSS SSS SSS SSS SSS SSS SSSSSS= " 

j 1S5 W1 OLEN a 

sa An Ta M print a RECACCTE TOH 

@ 6,5 SAY " for all enlisted personnel in the squadron. " 

MISS SA Press the P key to print." 

M EE , Any other key will returni QE o 

eru. 

STORE ' ' to answer 

end get answer 

MEE: E so Du 

ENDIE OON 

STORE "P" to answer 

ERASE - 
ame Sure vou S 1g 

meo Ou M Po k PRINTERs "ON LINE" light 

ls lit, then i 
@ 12,0 SAY ! HIT ENTER 


Q 14,0 SAY ' Or to QUIT NOW, press any other key.' 
e EE GET answer 


DIE HE uem) co DE 
RETURN 


Q 5,0 SAY ' Now putting ENLISTED personnel in 
al buabeticalkorderm | 

STORE drivert'enlisted' to drivefile 

USE &drivefile 

INDEX ON name to &LNAME 

USE &drivefjle INDEX &lname , 

@ 10,0 SAY ^ Now transferring Co printer 

REPORT FORM erecall TO PRINT 

RELEASE answer 


9e 


RETURN 
ENDDO 
ZME E:V ERECALL. PRG 


kkkkkkkkkkkkkkk  ESENIOR.PRG ******k*kkkkkkkk 


eai sted Seniority Listing 
Author: M. W. Skahan 
Date: JAN 86 
Allows user to ds out 
a Enlisted lis ordered Seni ity. (E- -9 to E-1) 
EE vx p dodge cue JA K KA EX 
SED TALK OFF 
Some LNIENSITY OFF 
Sef SELL OFF 


% ob th obo 


R 
@ 1 , O SAY VSS = = OO O O SS SS SS SS SS 2 2 2 2 2 22m 
@ 1 , 40 SAY Toe 
OEE, O SAY la 
aa, 18 SAY 85 ENLISTED SENIORITY LIST" 
@ 3 i 40 SAY N en eee eee eee" 
cm 4 O SAY "||" 
@ 4,78 SAY "||" 
EN. O say 211" 
mes, 78 SAY "||" 
ooo, O SAY Yj” 
mm 6,78 SAY "||! 
oe 7, O SAY "I" 
mee 78 SAZ "n" 
oe, O SAY "||" 
@ 8,78 sar "||" 
LE 9, O SAY "||" 
En 78 SAY "||" 
MATO? O SAY "||" 
a 10,78 SAY "||" 
mee, O SAY "ji" 
m7 78 SAY "qM" 
@ ll P O SAY "WSS ee ee ee ee ee Se ee ee ee ee eee ="! 
a 11 : 40 ay" l========================================" 
ae 5 5 oe cs Monta ccenmority 

CES Y to E-l 
@ 6,5 for al md personel in the squadron. " 
EN S, 5 5 Press the Coprint. 
E PARE other a will return you to 

enu. 
STORE ' ' to answer 
8,7 get answer 
Nt Men) S Ip 
ENDIE ^ 
STORE "P" to answer 
ERASE | 
Q 10,0 SAY Macaco OLER NTERS “ON LINE” light 
COMAS aun HIT ENT 
; NTER' 

@ 14,0 SAY ' Or to QUIT NOW, press any other key. 
@ 16, 10 GET answer 

IF ner) sa adi 
ENDIF 
ERASE 


Of j 
STORE Ero. ehlisted. to drivefile 
USE &drivefile 


@ smo Es ' Now ordering personnel by RATE and Date 


29 


ENDEX MON pac adoro SE 
USE &drivetile INDEX &ZPGC 
ORO SAM Now transferring to princo 
REPORT FORM esenior TO PRINT 
RELEASE answer 
OS 
ENDD 
* EOF: ESENIOR. PRG 


ERERERERERERERR MANPOWER. PRG *žkkkkkk*ěkkkkkxk 


Enlisted Manpower 
Author: M: wW okana 
Date: JAN 86 
Allows user to pra out 
a Manpower | listing ordered by Billet, Sequence sd 
Rk Rw ee eee ee ee Re ee ee ee oe ee ee REKA K RA RNA 
SET TALK OFF 
SEL IN REL Jo Eu POLE 
Son PEEL 
ERASE 
DO WHILE T 
ERASE 


ES 


pb JR Ga 


- -J 


J å N N N 


-] — 
OOOOOOOOOOOOOOODOODOOOOOOOO 
Uu) 
> 
K 


Ip PPPpP 
(:0000YUTIS IB (S OO OtXOX000 00 -1-JO0 OYUTUTi H> 09 01 Di BO ES iS 


This will print the MANPOWER listing " 
SAY f *oneall E pE in the squadron. 
Press the to prine! 
SAY " Any other ey oe return you to 
ENLISTED Menu. " 
STORE ' ' to answer 
@ 8,7 get answer 
EAD 


H 


~ «a » *®% ti A S A A A A A A & A A A SB HS BA HN € 


UIUI e 
U 
> 
K 


"a 


(B) geeergmeremrem BB RB CB) 


Qf (answer) SIDE 
RETURN 


ENDIF 


STORE "P" to answer 

ERASE 

Q 10,0 SAY ' Make sure your PRINTERs "ON LINE" light 
is lit, ien 

@ 12,0 SAY ; HIT ENTER' 

@ 14,0 SAY Or to QUIT NOW, press any other key. 


READ’ 10 GET answer 

IF ONIS) X MD 
R TURN 

ENDIF 

ERASE 
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Q SMO SAY ' en putting ENLISTED personnel Billet 
equence orde : 

STO EWdrivert EE icc JE ane 

Mm Eršdriveflile 

DE: ON Dsctrbsc to &ZBSC 

USE &drivefile INDEX &ZBSC 

Q 10,0 SAY ' Now Eu Co printer. 

REPORT FORM manpower TO 

RELEASE answer 

RETURN 


ENDDO 
* EOF: MANPOWER. PRG 


KEEKKKKAKKKKKKK — ESECURE. PRG ****kkxxxkkkkk 


ENU for ENLISTED SECURITY? PROGRAMS 

* Author: M.W. SKahan 

* Date: JAN 86 

Mi ovides user with choice of OE E 
to process enlisted security d ata. 

deve Ue de de de vede vede cde ode dede dede decode dede de deve ode odece dee dede deett 

SET TALK OFF 

Sal INTENSITY OFF 

set BELL OFF 

ERASE 

DO WHILE T 

ERASE 


pr 
J <I S N PB JB $ 
DOOOOCOOOOOOOOOOOOOOOOOOOOOOONOOO 
tn 
D 
K 


-1 


I Y N 


ppp sp ppp ps 
J 


n Y. exit to ENLISTED MENU" 
SAY l. Squadron Roster of all" 
27 Top secret Clearances” 
3. Secret Clearances" 
Sad. Confidential Clearances" 
O SAY 5. Personnel without any clearance" 
6 TO selectnum 


CIO "NN NN NN NN A 5 5 soso. o. 
s NNNNNDNHÉA 


NDOODODOODODODOOODOODOODOOODOOODODDOODOOODOO® 


H 
O 
peki ZJ E330 00 —1O9YUICOCOPbO PO 2 ESO OXOx0O 0000 —1—10YOYU1UT S BWOWNND 


DO WH BE selectnum < 0 .OR. selectnum > 5 


233 SAY " select eee M 
12,48 CeT select PICTURE "#" 


A 
STORE VAL( select) TO selectnum 
ENDDO 


DO CASE 
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CASE selectnum= 0 


erase 
RETURN 


CASE selectnum= 1 


the squadron roster 
DO ESECACE 


CASE selectnum= 2 


* 


DO enlisted with top secret clearances 
DO E SECTOR 


CASE selectnum= 3 


* 


DO enlisted with secret clearances 
DO ESECSEC 


CASE selectnum= 4 


* 


DO enlisted with confidential clearances 
DO ESECCONE 


CASE selectnum= 5 


* 


OTHERWISE 
ERASE 
Or 7710 cSAY CHR js "INVALID ANSWER, TRY O = 5" 
ENDCASE 
a 
STORE " " TỌ select 
a SAY "Strike any key to continue... " GET select 
ENDDO T 


DO enlisted with no clearance 
DO ESECNONE 


m BOP: TESECURE PRG 


kkkkkkkkkkkkkkk ESECALL. PRG KXKRKRKKKEKKEKKE 


A + 


Enlisted Roster of all clearances 
Author: M.W. Skahan 

Date: JAN 86 

Allows user to print out 


an Alphabetized Roster of 
de A de te že de Se de * 


Te le tee Oe We Ke ee ie ee ee ee ie ee 


it Ale 
oft INTENST? TOFE 
SET BELL ORE 


ERAS 
POM 
ae 


HHHH 
OUIHHEHEHOODOODOODOJJOGOUUHUBIB OUNNNE 


O A A A 


DOVOOVOGOGOOOOOPDODODOOODOODODOODOOODO® 


E 
HICE T 
E 


4 


e SIH op 


“J N 


- o o 1 ~ 
OCOOOOOOOOOOOOOOOOOOODOWMOOO 
in 
> 
K, 


oou 
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A Z PINE, SM ce nn on son ee ee ee ee ee eee ee ee ee ee oe 


SAY 
SAY " This will print a listing of al clearane 
SAY " held by enlisted personnel in the squadron. 


all security clearances held. 
kkkkkkkkkkkS5 


@ 8,5 SAY " Press cnc ce co print.” 
SAZ " , Any other key will return you to 
CLEARANCE Menu. 
STORE to answer 
@ 8,7 get answer 
READ 


af aeger) <> RE 
RETURN 


ENDIF 
STORE "P" to answer 


ERASE : ma 
O Sar ' | Make sure your PRINTERs "ON LINE" light 
m lit, en 
@ 12,0 SAY ' HIT ENTER' 
@ 14,0 SAY ' Or to QUIT NOW, press any other key. 
@ 16,10 GET answer 
READ 
IF MEE) <> UBA 
RETURN 
ENDIF 
PRES 


D 
E ,O SAY ' Now putting ENLISTED personnel in 
Iohabetical. order. | 
STO E driver*'enlisted' to drivefile 
USE &drivefile 
INDEX ON name to &LNAME 
USE &drivefile INDEX &lname 
œ 10,0 SAY Now transferring clearances to printer. 
REPORT FORM esecall TO PRINT 
RELEASE answer 
RETURN 
ENDDO 
EFO: ESECALL. PRG 


kkkkkkkkkkkkkkk ESECTOP. PRG žžkžkkkkkkkkkkk 


* Enlisted Top Secret Listing 
* Author: M.W. Skahan 
JAN 86 


1 


* Date: 

E "lows user to I. Que 

fea Enlisted lis with TS clearance 

EE ERRE ARA RAR kkkkkkkkkkkkkkkkkkkk 

eet TALK OFF 

EET INTENSITY OFF 

eet BELL OFF 

ERASE 

DO WHILE T 

ERASE 
SAY " WA AA AAA AAA AAA AAA AAA AA AA A A És " 
SAY " ———— Sm SS SS SS SS SS SS SS SS SS SS EE Ee POME " 
SAY HE 
SAY 85 ENLISTED TOP SECRET CLEARANCES" 


SIN NB JB OOB 
OODODODODOODODODODODOOODODNOOO 

Y 

Is 

Hd 


NJ å N N N 


(gyugyrgyrerereripeememernmrmrereretrerm e) E 
HH40O ww 0030010101 Hs 09 MIN Nin RIA 


tt 
-] 


LCS 


OVE © oe USE = eee 
@ 11,40 SAY Jy ——LLlIlÍIllllllllllllLllllllllllllllllÍlÍll--zi! 
CEE SAY " This will print a top secrev jeba mea mio 
edm aS 
NDS ŠAY " for enlisted personnel in mnop q eie 
Q 8,5 SAY , Press the P key to print. 
3 CLEARANCE , Any other key will return NA 
enu. 
STORE to answer 
S get answer 
mi NE NM 
ENDIF 
eae "P" to answer 
o~O OFSA T Make sure your PRINTERs "ON LINE" light 
1 


je lje, then 
@ 12,0 SAY ! HIT ENTER' 
O 14,0 SAY ' Or to OUIT NOW, press any other key. 
RE 16,10 GET answer 


IBS (answer) SN 
RETURN 


ENDIF 

ERASE 

SET PRINT ON 

EJECT | 

m , DATE ) 

P HS-85 TOP SECRET CLEARANCES' 

? 'Rate ame SSN 
Clearance 


^ ! 


SET PRINT OFF 


ERASE 
Q 5,0 SAY ' Now duse all personnel with top 
secret clearancés... 


STORE ' ZU EO NH 
! 
STORE BORZ nace 
STORE to ss 
STORE ' ! to Zseceli 


STORE driver+'enlisted' TO drivefile 
USE &driverfile 

index on name co el nahne 

use &drivefile index &lname 


GOTO TOP 
DO WHILE <O: KOF 
STORE name TO Zname 
STORE rate TO Zrate 
STORE ssn HORSE 
STORE secc cir TO Zseccolr 
STORE IRIM: z OTOP SEAE IO Zsecclr 
IF Zsecclr = TO ET 
SET FRIDI ON 
? grate , aname, ' Zssn, 
SET PRINT OFF 


SKIP 
ENDDO 
SET PRINT ON 
BJECT 
SET PRINT OFF 
*to clear buffer 


o Z2secc il 
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RELEASE answer, Zname, Zrate,Zssn,Zsecclr 
RETURN 

ENDDO 

OMEOE.V ESECTOP. PRG 


kkkkkkkkk&k*&kx*5k*k*  ESECSEC.PRG *****&k&kkk&kk&kk 


* Enlisted Secret Listing 

* Author: M.W. Skahan 

% Date: JAN 80 

Plows user to Pelee out 

Meee enlisted listing with Secret clearances 
DERE e X ve se se ve sie RR ARRE ode cock ARRE RARA kA Mk 
EET TALK OFF 

EBEDOINIENSITY OFF 

pee BELL OFF 


J 
O 
NaN 
71d 
LA 
[t 
ta] 
H 


SAY H H 
SR "H9783 ENLISTED SECRET CLEARANCES" 


“ION N N N N J] b NIK 


- ie 
(903096309 609/69 096109 €). 00.6) 9.69 C9 CO CO EX RD GD ES) G0 99 
UN 
"> 
A 


ps ps 
LOCOGINIHH5E5OOOOODOOJSOON BB OONNINEH 


— M —À — e e OSP CNC OMO AMO ONE mm cm cmc cm cc cm cc cm es COS 


ES al ae a secret clearance listing" 
oo geet creentisted personnel in the squadron. ~ 
e T Press the P key to print." 
ES SAY Any other key will return you to 
CLEARANCE Menu. " 
STORE to answer 
@ 8,7 get answer 

EAD 


T A A A A A OW 9 « A ^| A S. A W AM AM . S W —W AM) A) A > i, 92 


~ 


OODODOOOODOOOOODOOOODOOOOODODOOODOOr 
MOB 

U 

D 

K 


if answer) SI PI 
RETURN 


ENDIF 
STORE "P" to answer 


ERASE 

O 10,0 SAY ' , Make sure your PRINTERs "ON LINE" light 
is E, then 

@ 12,0 Say ' HIT ENTER' 

@ 14,0 SAY Or to QUIT NOW, press any other key. ' 


@ 16,10 GET answer 
READ 
IF Na never) <> "p" 
RETURN 
ENDIF 
ERASE 
ELC PRINT ON 
EJECT 
? DATE) 
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HS-85 SECRET CLEARANCES' 


"Rate Name SSN 
Clearance 


UNS 


> t 1 
SEMEN TO EE 


ERASE 
@ 5,0 SAY ' Now getting all personnel withisecoes 
clearances... 


STORE ' Muto zname 
STORE bo Zrate 

STORE Lo ¿ssn, 

STORE ' to Zsecclr 


STORE drivert enlisted ane mS 
USE &drivefile 

index on name to &lname 

use &drivefile index &lname 


GOTO TOP 
DO WHILE mot. EOF 
STORE name TO Zname 
STORE rate TO Zrate 
STORE ssn qose 
STORE secclr TO Zsecclr 
STORE TERIM! (zseccir), lO gsecevu 
IB Zseccir = SECRET 
SET PRINT ON 


Grae 
ŠET PRINT OFF 
ENDIF 
SKIP 


ENDDO 
SH ee eid ON 
IS mc 
SET PRINT OFF 
*to clear buffer 
RELEASE answer,Zname,Zrate,Zssn, Zsecclr 
RETURN 


ENDDO 
S EOR VESEGSEC. RRG 


eRe Ree ek ESECCONF. PRG dee ewe ea eee IE 
*i Enlisted Contidential busting 

* Author: M.W. Skahan 

* Date: JAN 86 

* Allows user to print out 


, Zname,' ',Zssn,! ' Zsecelr 


. a NLISte aom E W1 om na Clearamces 

S Enlisted 11 j Lth- Confidential moi 
RKRRMRERR ARR ERR eae Ro A A ee Ae 

Set TARR OEE 

SERMINSENSBEDC ORE 

SET BELL OFF 

ERASE 

DO WHILE T 

ERASE 

@ TAO SAY ======================================== 
(A ili 1 40 BY "=========================== 5500 v MM 
@ 2 (Orsay "dd. 
O SE E V 85 ENLISTED CONFIDENTIAL CLEARANCES' 
(S UC K ll se PENN 
@ 3 , 40 SAY tM========================= === == RRNA 
vao sap LT 

MIU E 

(IESU M 

@ BEES E 

@ e OR ar 


TOG 


@ 6,78 SAY " de 
O TO SAY " 
@ Z , 78 SAY tt l 
@ 8, O SAY " j 
@ 8,78 SAY " E 
@ 9 , O SAY 1 "n 
o 9,78 SAY " à 
@ 10, O SAY " 1 
@ 10,78 SAY " " 
UME © SAY 1 i 
O 11,78 SAY " za, 
@ 3001 f O SAY k E Dia a DT IAE au i 
@ 11 i 40 SAT, ================================== == === 
o SAY * This MES print a confidential 
clearance listing E 
UNE5 5 SAY for enlisted personnel in the squadron. 
@ees,5 SAY " Press the P key to print. 
@ 9,5 SAY a „ Any other key will return you to 
CLEARANCE enu. 
STOR to answer 
E get answer 
İf an e) <P 
ENDIF M 
STORE "P" to answer 
ERASE ' tt "n C 
@ 10,0 SAY EEUU JcESure VyourocPRINTERSO “ON LINE” light 
is iit, then 
mo 12,0 SAY | HIT ENTER' 
A 16' O dona Or to QUIT NOW, press any other key. 
answer 
R AD 
NE ESA <> "p" 
exp RETURN 
ERASE 
ITPRINT ON 
EJECT 
n , DATE( ) 
2 HS-85 CONFIDENTIAL CLEARANCES 
? 
? 'Rate Name SSN 


E lea ance. 
> 


ep Nt OFF 
@ 5,0 SAY ' Now getting all personnel with confidential’ 


STORE ' Pato. Zhame 
STORE ' DE Eo Zrate 

STORE ' to Zssn, 

STORE ' merc cecc ir 


STORE driver+'enlisted' TO aa ile 
USE &drivefile 

index on name to &lname 

use &drivefile index &lname 


GOTO TOP 
DO WHILE .not. EOF 
STORE name TO Zname 
STORO Zrate 
STORE ssn IO Zssn 
T FORE secclr TO Zsecclr 
STORE TRIM(!(2secclr)) TO Zsecclr 
TE Z2secclr = CONFIDENTIAL 
SET PRINT ON 


¿rate 
ŠET PRINT OFF 


, Zname,' ',Zssn, ' ,Zsecclr 
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ENDIF 
SKIP 


ENDDO 
SET PRINT ON 


EJ REY 
SEL PRIN OnE 
GO clear buffer 
RELEASE answer,Zname,Zrate,Zssn,Zsecclr 
RETURN 
ENDDO 
«O NOE; ESECCONE ERC 


Ak ek kx xA à x xx k** ESECNONE.PRG ********kkxeeek 


* Enlisted With No Security clearance 
* Author: M.W. SKahan 
* Date: JAN 86 

* Allows user to print roma 

"7 aembnicsscecd succ mge wem 

v de vedededewdeddeuuwudsdgXqXq£-9 9 9 d d RRRS RRA wx 
SET TALK OFF 

SETTINIENSIT OFE 

Sia JER Orr 


ERASE 
DO WHILE MA 
ERASE 


“ION N N N N ee Pp NR b 


— 
OOOOOOJODODOODOOONDOOOOOONODOOO 
Ul 
JD 
K 


pp ps pp 
0 DUMIH5 55 OOCOOOOSšSJODOM 4» CO CObO PO CO ES E59 


"- ~~ » - ww. WoW ^ ^ S. M. S. € ® X. OW S €. €. X SS NS S. Bw So 0 


This will print a no-clearance listing" 
SAY " for enlisted personnel in the squadron. 
SAN ee. Press the P key to princes 
9,5 SAY " Any other key will return you to 
CLEARANCE Menu." 
STORE ' ' to answer 

Dd get answer 


(eyreygyreyreyrerefremmurgmeerretrermrgtatrermfrgtretrmf.rgytra.y. 
Uni 
Un 
D 
K, 


JE Mn oM A 
RETURN 


ENDIE 

STORE Po ato) answer 

ERASE . 

(EO ono Make sure your PRINTERs "ON LINE" light 
is lit, then! 

a 12,0 SAY HIT ENTER' | 

O 14,0 SAY ' Or to OUIT NOW, press any other key. 


@ 16,10 GET answer 
AD 


IF !(answer) <> "p" 
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RETURN 
DIE 


ERASE 
SET PRINT ON 
EJECT 


? PED) 
E ; HS-85 PERSONNEL WITH NO SECURITY CLEARANCE 

? 

? 'Rate Name SSN 

E Clearance 


SET PRINT OFF 
ASE 


ERA 
@ 5,0 SAY ' Now getting all personnel with 
no clearances... 


STORE ' Mio v zn ane 
STORE ME ve Zrate 

STORE to Zssn 

STORE ' MOS Seca E 


STORE driver+'enlisted' TO drivefile 
USE &drivefile 

index on name to &lname 

use &drivefile index &lname 


GOTO TOP 
BO WHILE .not. EOF 
STORE name TO Zname 
STORE rate TO Zrate 
STORE D E 
STORE se lr ase 
STORE TRIM(! Ft2necc]r]) "TO zsecclr 
HE Zsecelr = 'NONE' 
SET EINE ON 


Ar 
SET PRINT OFE 
ENDIF 
SKIP 


ENDDO 
SET PRINT ON 
EJECT 
SET PRINT OFF 
*to clear buffer 
RELEASE answer, Zname, Zrate,Zssn,Zsecclr 
RETURN 


ENDDO 
Y BOE: ESECNONE. PRG 


KKKKKKKEKKEKEKEKK UPDATE.PRG ******xkxxkkk 


* UPDATE MENU for ENLISTED PROGRAMS 
E Author: M.W. Skahan 
* 


Znane Assn, ' Zsecclr 


Date: JAN 86 
gr ces user with choice of options 


A 


to date enlisted data. 

e ERERERERERREARERERERERERRRRRA RAR 
SEI TALK OFE 

Sem INTENSITY OFF 

SET BELL OFF 


ERASE 

nS screen with choices 

ERASE 

RN O------.-.-.-..-... ZMED /«o' 

@ 1,40 SAY | SUS S SS SS SSS SS SSS SSS SSS SSS SSSSSSSSSSSSSS" 
ma 0 SAY "hd. 

O a $E n 85 ENLISTED DATA BASE UPDATE SELECTIONS" 
(Q9 3. O SAY " SSS ee ee ee Se ee ee ee ee ee ee ee ee ee ee ===" 


N N N N N Nê B 


HHHHHHHH 
~] 


O. exit to ENUTSTED AO um a 
SAY " l. ADD a new squadron member! 

2. DELETE a squadron member" 
SAY " 3. CHANGE an existing member's data" 
TO selectnum 


NNNDA y x 

H% i(OOOOOO0000000000000000000 
tn 
ps 
Hd 


FH 
O 


process the selection 
ITE Wc CM < O .OR. selectnum > 3 
ORE " " TO select 
12 33 55 "> Select So: M 
AE E TUR ICM 


AD' 
STORE VAL(select) TO selectnum 
ENDDO 


DO CASE 
CASE selectnum- O 
*GO BACK TO ENLISTED MENU 
ERASE 
CLEAR 
RETURN 
CASE selectnum- 1 
* Do the addition of a squadron member 
DO EADD 
CASE selectnum- 2 
* Do the deletion of a member 
DO EDELETE 
CASE selectnum= 3 
* Do a change to the data 
DO EFI IT 
OTHERWISE 
erase , 
Q 7,10 SAY CHR(7) + "INVALID ANSWER, TRY O - 3 
ENDCASE 


D+ NVODOADDDAYDODDDPOAODDDAADDADOMM® 
Q 


O 
SEO DOIN TW WN NF-H EO OW 01 00 -—0YOYUT1TUTn BOO 


STORE " " TO select | y 
SA o SAY "Strike any key to continue... GET select 
ENDDO 


T 
SREOE “UPDATE. PRC 


k sk kk koke k k kk kk kk EADD. PRG KERKKKRKKKKKEKE 


* ADD ENLISTED DATA 

* Author: M.W. Skahan 

* Date: JAN 86 

* Allows user to add 

* enlisted data. 

Ro o o Je o Je že o ko žo ko k k k k ko Ro Rk Ro Ro Rk RR Rk Rk ko Rk k eoe eode A AR x 


oi TAB ONE 
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SEME MENSIIY OFF 
Shier hl, OFF 

store Y to addmore 
ERASE 


say HS - 85! | 
@2,22 say 'ADD DATA TO 
@ 3,15 Say EN SE PERSONNEL 
STORE 'N' TO YESNO 
@ 6,8 SAY "Press the Y key to see an explanation 
of the data fields. : 
@ Doe pos Otherwise gust hit the space bar. 
@ 8,8 GET YESNO 
READ 
Eua 
DO DATA zem 
ENDIF 


DO WHILE addmore 
ERASE 


STORE driver+'edummy' TO drivefile 
USE &drivefile 


DELETE ALL 

PACK 
APPEND BLANK 

@ 1,0 SAY ' HS-85' 
UNZ, O SAY ' ADD NEW, PERSONNEL DATA' ! 
BE Ulo say "P BSC ' GET bsc PICTURE '!!!!!!!'". | 
DIS O SAY ERIS SC GET rbsc PICTURE P opp 
A 6,0 SAY '3 LAST NAME FIRST NAME, MI ' GET name; 
PRETURE Uri ri ol rd 
: : ara oNMETCH ORE UT IIT 

@ 7,0 ET 4 ASSIGNED RATE ' GET CenpICTURE "Irrt rmi 
m7 Oo S AXN ae ACTUAL HERE CET rate PICTURE "tror 
@ 8,0 ae Se Guescsn PECTURE. 'fitrrirtrrrryt! 
@ 9,0 SA z PN D ET phnec PICTURE (111111 
@ 9,30 BAY : S NEC CET susc PICTURE 111111" 
@ NO. O SAY | Š: HACES T eaos PICTURE 't':t:rvív' 
ali, O SAY MO PRD I CET prad PICTURE oe ee O 
UMUW SO SAY ‘11. DATE of RATE OLP dOr PICTURE "ICEL 
CRI FO SAY '12 Sm RUS MENI status PICTURE ''rtrr11' 
mars O SAY '13 DEPARTMENT “UCET dept 

OTU RE ''rrrisyrrtrrys! 
CO SAY "14. PAY GRADE CODE ' GET pec PICTURE SEA 
mms Oo SAY ‘15. STREET ' GET street 

ENSURE IIIT rtre LITTE, i 
@ 16,0 SAY Gr ENTE ' E eT PICTURE ORANTI preron! 
UMNO SAY 17. STATE ' GET Space ME ME PET 

A, SO ES. ZIP ` CET Zip BIGMURE VP rrrrrr ii ro? 
04 18,0 SAY 19. HOME PHONE GET hphone 

EMS MIRE Tiritiri? 

O 18,30 SAY '20. BUSINESS PHONE ' GET bphone 

PICTURE eee 
@ 19,0 SAY '21. SECURITY CLEARANCE '; 

GET secclr ENS NEG C OM TOP OP Y Y! 

EME OVO SAY 22. GEO. ZONE ' GET zone PICTURE '!:'!!' 
STORRE | ' TO loo de 

DO WHILE loopitzi 

STORE To decide 


EAS, 25 SAY MAIN MENU = M, CANCEL = C, PROCESS = P' GET 
decide PICTURE '!' 


READ 

IF Neca e)<'M' .OR. !(decide)<'C' .OR. !(decide)-'P' 
STORE TO loopit 

ENDIF 

ENDDO 

E decide) = P” 


EMORE drivert enlisted' TO drivefile 


LA 


* 


TUS Sea Je seine 


STORE driver+' e TO addum 
APPEND FROM &addu 
@ OE SAT 


STORE 


SIO 


R 
GZ ogee) SAT 


y 1 


RE 


ENDIE 


ENDDO 


IE da o 


ELSE 


STORE 
ENDIF decide 
SE 


ey 


em 


"FUNCTION COMPLETED' 
LOMO pue 


DO EL Ie M ' 


ide 
RTH MENU | = M, CANCEL = C, PROCESS = P'; 
GET decide PICTURE Do 


decide 


Br !(decide)='C' .OR. 


TO loori 


Bi 


y no addmore 
N TO addmore 


STORE N TO addmore 
ENDIF decide 
ENDDO addmore 


RES addum,decide,loopit,addmore 


STORE drivert enlistead "TOV M eI 
RETURN 


EOF: EADD. PRG 


vede ce coe oe ux ue um T X 


EDELETE. PRO *****X*FR*FRARRAR 


* DELETE ENCEISTEDARECOROS 


* Author: M. 
JAN 86 


* 


Date: 


W. Skah 


eurer 


* Allows user to delete 


* 


enl 


SET TALK OFF 
SE yee oa Oe oy 
ERASE 
STORE X TO dropum 


DO WHILE dropum 


ERASE 
STORE drivert enlisted TO drivefiie 
USER dr IVe Te 

INDEX on name to &lname 

USE &drivefile index &lname 


STORE 


U) 
ge. 
O 
HU 
tz] 


U) 
HJ 
O 
JU 
tj 


! 


1Sted. records trom aa 
kkkkkkkkkkkkkkkkkkkkkkkkkk k 


1 


x ct 
+9 


SAY HS-85' 
SAY 'DELETE SOUADRON MEMBER' 


" TO membe s 


TOO SE 
EON LI Sc 


NOS Za ane 

TO Zrate 
PANO) aS Sal 
' TO Zpnec 
MEO Z nec 
Foen 
f 
1 


TO Zae 


' TO Zstreets 
TO Zeit 
TO Zstate 
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! (decide)<'P' 


STORE . OV Zep 

STORE ' TO Zhphone 

STORE ! t O DANS 

STORE ' TO 2secene 

STORE ' ' TO Zzone 
ON say "To EXIT push ENTER only. | 
@ 4,0 SAY "Who do you want to DELETE ?". 

eal member PIO E sii la 

READ 
IE RETORN OO 
ENDIF 

STORE TRIM(!(member)) to name 

FIND &NAME 

STORE # to recnum 

erase 
IF recnum = 0 
NOZstound, 


a0 ,20 SAY That ing 


Opel? 15 SAM ES again short version like 


SMI for SMIT 
@ 14,15 SAY 'is OK to use. ' | 
@ 18,5 SAY 'HIT ANY REY torcontinue." 


set console OFF 
WAIT 
set console ON 


o E 


STORE 
STORE 
STORE 
STORE 
STORE 
STORE 
STORE 
STORE 
STORE 
STORE 
STORE 
STORE 
STORE 
STORE 
STORE 
STORE 
STORE 
STORE 
STORE 
STORE 
STORE 
STORE 


@ 1,0 
OSS ORSAY | 


beemio Zosc 

Bose LO Zrbsc 

name TO Zname 

arate TO Zarate 

rate TO Zrate 

ssn TO Zssn 

pnec TO Zpnec 

snec TO Zsnec 

eaos TO Zeaos 

pro Zprd 

Gore. Zdor 

starus TO ZStatus 

dept TO pe 

pee E 
reet T T EN 

stat Bo catu 

state TO DE 


oh TO TE 
one TO Zhphone 
Eds IO Zbphone 
secclr TO Zseccir 
zone TO Z2zone 

SAY HS-85 DELETE PERSONNEL DATA' 


SA RE HEBR Se person 


from the records. 


` ~ ` ` ~ ` 


~ 


VOLVO NONONO DTO VOA 
UOODOHUWNONDOWOBO 


~ 


( (B ©® © © BD (e m 


~ 


~ Qr ~ 


~ 


EU JI. BSC ' 


,8 SAY 


ES 

9 

S 

9 

SA 4, "ASSICNED RATE ' 
17. SAY Zarate 

SENS. ACTUAL RATE! 
46 SAY arate, 

SAYT O. SSN 

8 SAY Assn 

Siew. PNEC ' 

9 SAY Zpnec 


SOME MSNEC ' 
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9,3 SAY aZsnec 
O AY "OL EMOS ' 
i SAY Zeaos 


~ 


AY v P 


@ 9 
GEO O S 
Q 10,9 
e 11,0 S 
Q 11,8 SAY Zprd 
@ 11,30, 8A Poi. DATE of RATE ' 
; Or 
@ 12,0 SAY "2 -rm 
@ 12,12 SAY Zstatus 
@ 13,9 SA 2133, DEPARTMENT ! 
@ 14,0 BÀY 14; BAY GRADE CODE ' 
@ 15,0 SAY '15. ^PSSREET 
Gms 5 SAY astreet 
@ 16,0 SAY '16. CITY ' 
@ $75180'SÀv *172 STATE 
Q 17,12 SAY Zstate 
@ 17-30 cn izbe 
o 17,39 SAY ip 
@ 18,9 NEUE ME PHONE ' 
NOA 
@ G 1E SO SAY Z 20. __ BUSINESS PHONE ' 
@ I o Sn CUTE CLEARANCE 
a 19,25 sa Zsecclr 
@ 20,0 Sa DONES ZONE 
sr 0, 20,17 SAY LEDS pana nk 
ae QE me B this person type miD | 
1 
DO WHILE lgopitz" | 


STORE TO decide 
AAA SS 'MAIN MENU z M, CANCEL = C, DELETE = D' 
@ 23,60 GET decide 


READ’ . 
IE f(decide)- M' — OR. t(decide)- € 
OR. !(decide ME IB 
“STORE, X (LO loopit 
ENDIF 
ENDDO 


IF !(decide) = Di 
ELETE 


PACK 
STORE ' ' O decide 
Un 12 SAY FUNCTION COMPLETED: 
STORÉ TO opit 
DO WHILE Loop Date 
STORE O de ide 
@ 23, ES BY. “UB DATE e S 
CANCEL = C DO MORE = 
@ NY, 63 GET decide 


RE 

IF “(decide )=" M' a !(decide)='C' 

E a ka ao 

2S TOR TORT OODUGE 

ENDIF 
ENDDO 
je a 

ORE 7 ITO- dropum 


ELSE 
STORE N TO- -dropin 
P e decide 


STORE N TO dropum 
o decide 


ENDDO dropum 
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USE 

RELEASE dropum,member, loopit, decide 
RETURN 
* BOF: EDELETE. PRG 


me dee e 


see dede dee dede 


EFIXIT2.PRG *******kk*kkkk« a 


LUO VE ILISTED DATA 


* Author: 


M. W. Skahan 
36 


TC 


* Allows user to change values in 


de ede RR EER RRR RRR RRR RRR EKER RRR KR RRR KK EEK 


* Date: JAN 
enlisted data 

See TALK OFF 

Soe INTENSITY OFF 

SET BELL OFF 

ERASE 

STORE O TO recnum 


DO WHILE t 
ERASE 


MENO SE Ce nom STED data c 
MODE driverimenlisted TO drive bate 
ES &drivefrile 


index on name to &lname 
Use &drivefile index 


Ul 
H 
O 
va x 
E] 


1.00 


Q 6,22 sa 
Q 4,0 SAY" 


READ 
IF member 
RETURN 


! 
! 


-< "=" = = = 0m 


TO Zbsc 


BIDEN 


TO Zarate 
ite ¿rate 


&lname 


HS-85 
PAY "CHANGE PERSONNEL DATA’ 


TO member 


—moWzname 


TO ZSS 


zpnec 
Zsnec 
¿eaos 
EL 
Ador 


O ¿status 


TO Zdept 


TO Zpgc 


' TO Zstate . 

| auc 22D 

, TO Zhphone 
TO Zbphone 


TO ¿Zone 
"To mE Xi T 


Who's dat 
GET member PICTURE 


TO 


' TO Zstreet 
ACity 


TO Zseccir 


push ENTER only. " 


a needs update? ° 
) 17111 11 


s o ce € € ec ọọ ọọ o 8% o @ @ @ vV o o O @ o @ o 


4 
renee yy epee ee yt 


ENDIF 
STORE: TRIM(!(member)) to name 


EI 


ND &NAME 


STORE # to recnum 


Prase 
IE 


recnum = 0 


OMO, SOMSAY "That ed 
u 


OM ZG SAY O try again. 


S 


S 


et console OFF 


WAIT 
et console 


ELSE 


ON 
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NOI found, 
sh any key to continue. 


! 


D (g) D (g) D 0 


© 
OH OH OH MW MoO OO ON Ox) DODUBB 


(g) (g) D (g D (g) D 


STORE DSC TO 2D 
STORE rbse TO Zrbse 
STORE name TO Zname 
STORE arate TO Zarate 
STORE rate TO Zrate 
STORE SSi TO ássn 
STORE pnec TOSSoMIes 
STORE snec TO Zsnec 
STORE eaos TO Zeaos 
S LORE pEa TOMapise 
STORE dol TO Mutuo 
STORE status 280, Zseacus 
STORE debt TO ČE ka 
STORE pac. TO age 
STORE Street T0 2- reet 
STORE E TO TAGLE 
STORE Saro LONAS tae 
STORE fab ARE) re 
STORE ione TO Zhphone 
STORE Bonen TO BSOS 
STORE secelr T0 Z5ecclms 
STORE zone TO zzone 
qj OU SA i HS-85 CHANGE PERSONNEL DATA 
2,0 Ar > If entry is good, hit ENTER 
3 OVSENI Io make CHANGE, Type over old 
entries and ENTER. 
SAY Vasco Sn Ii zbse 
et obse PICTURE e LAO 

"2 RBSC o Ray RE be 
et Zrbse PICTORE DR ONE | 

'3. LAST NAME, FIRST NAME, MI SAY zname 
get Zname PICTURE “LI nu 


Y '4. ASSIGNED RATE | SAY Zarate 
get Zarate PICTURE '!!!!!!!' 


SAY "52. ACTUALSRATLE : SAY ¿rate 
do get Zgrate PICTURE, Pri UNI 


SAY "6. SSN “SAY Zssn 
57 get: Zssn PICTURE 22 Vt ee. 


SAY '7. PNEC ' SAY Zpnec 
ao det zonecWwBDODURECUUENIM DS 


SAY "8 "SNEC. SAY Zsnec 
38 get Zsnec PICTURE '!!!!!! 


N 


~ 
a 


~ 


~ 


tn 
NP OY y» 


~ 


© 


~ ~ ~ 


O 


~ 


OW WOO 00 wU JO MOWOBO ODG 
HAN NND 


OO SAY "OG" BAGS." VSAYy Zeaas 
10,8 get Zeaos PICTURE 111111" 
1.0 SAY "10.. PRD © Say Zoja 
11,8 get Zprd PICTURE V rri mi! 
1,30 SAy '11% DATE or RATE SAMNIO 
11,47 get zZdor PIETURE UM! Ur ui 
1270 SAY 71125 STAWUS 5) Sa eso 
Q 12,11 get Zstatus PICTURE '!!!!'!! 
13,0 SAY '13. DEPARTMENT ' SAY Zdept 
a 13,15 get Zdept PICTURE '!!!!11fl111! 
14,0 SAY '14. PAY GRADE CODE ' SAY Zpac 
@ 14,19 get Zoac PICTURE (Ean 
LSO SAY '15. STREET ' SAY Zstreet 
@ 15,11 get Zstreet PICTURE '!1!lifiriirrriirirri rni! 
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1 
e. 
. 


cM SAvENUEG. CITY ' SAY Zcity 
UIN cec" Zzeity PICTUBEO t'trfrrrttrrrtr rtt 
Q 17,0 SAY '17. STATE ' SAY Zstate | 
@ 17,10 get Zstate PICTURE '!!!!'! 
UMNO SAY '18. ZIP ' SAY zzip , 
EMI S get Zzip PICTURE "1111111000 
@ 18,0 SAY '19. HOME PHONE ' SAY Zhphone | 
Go 18,15 get Zhphone PICTURE '!!!1T111rr1!11! 
@ 18,30 SAY '20. BUSINESS PHONE ' SAY Zbphone , 
@ 18,49 get Zbphone PICTURE "!r!!rrrrrrfiry 
@ 19,0 SAY '21. SECURITY CLEARANCE ' SAY Zsecclr 
6 19,23 get Zsecclr PICTURE '!!!trittitrriirrrri iti! 
Q 20,0 SAY '22. GEO. ZONE ' SAY Zzone 
@ 20,14 get Zzone PICTURE '!!!! 
READ 
IF Zname = 
RETURN 
ENDIF | 
ERASE 
@ 1,0 SAY ' Your new changes look like this 
Q 4,0 SAY '1. B 
Q 4,8 SAY bsc ; 
Q 5,0 SAY '2. RBSC 
Q 5,9 SAY Zrbsc 
@ 6,0 SAY '3. LAST NAME, FIRST NAME, MI 
@ Bee SAY Zname 
DE OSSA ASSIGNED RATE 
@ 7, I7 "SAT Zarate 
@ 7,30 SAY °5. ACTUAL RATE 
@ 7,46 SAY cc 
EMS 0 SAY "6. SSN 
@ 8,8 SAY Zssn 
@ 9,0 SAY '7. PNEC 
@ 9,9 SAY Zpnec 
@ 9,30 SAY '8. SNEC ' 
@ 9,39 SAY Zsnec 
ONO O SAY 'S. EAOS ' 
@ OS SAY Zeaos 
SE O SAY 10. PRD 
Q 11,8 SAY Zprd 
@ 11,30 SAY 'll. DATE of RATE ' 
@ 11,19 SAY Zdor 
EN O SAY "12. STATUS ' 
@ o 2 SAY Zstatus 
@ 13,0 SAY '13. DEPARTMENT ' 
@ 13,16 SAY Zdep 
@ 14,0 SAY '14. PAY GRADE CODE ' 
@ 14,22 SAY e. 
@ 15,0 SAY '15. STREET ' 
@ 15,13 SAY Zstreet 
@ 16,0 SAY '16. CIT 
@ 16,11 SAY Zcit 
SOME JO SAY “177 STATE ' 
o 17,12 SAY Zstate 
@ 17,30 SAY E 
Q 17,39 SAY ip 
@ 18,0 SAY rice ^8 ME ,PHONE ! 
Q 18,18 SAY Zhphon 
Me 50 Say "20. BUSINESS PHONE ' 
o 18,50 SAY Zbpho 
UO oO ORT "21 ECURITY CLEARANCE ' 
Q 19,25 SAY Zsecclr 
@ 20,0 SAY ceo. ZONE ' 
@ 20,17 SAY Zzone 


sha i 


ST oo ENS 

Q 22,5 SAY 'Are these correct (Y/N)? 
es e ¿30 GET yesno 

IB *Cyesno) zr 

REPLACE bsc WITH Zbsc 

REPLACE rosomu TIN ZTDSC 

REPLACE name WITH zname 

REPLACE arate WITH Zarate 
REPLACE rate WITH Zrate 

REPLACE ssn WITH Zssn 

REPLACE pnec WITH Zpnec 

REPLACE snec WITH Zsnec 

REPLACE eaos WITH Zeaos 

REPLACE prda WITH zapre 

REPhACE dor^wWwrtl7H acr 

REPLACE status WITH Zstatus 
REPLACE dept WITH Zdept 

REPLACE pge WITT DUC 

REPLACE reet WITH Zstreet 
REPLACE stat WITH 2o9c5y 
REPLACE state WITH Zstate 
REPLACE 
REPLACE 
REPLACE 


WITH E 

one WITH Zhphone 
E ROME WITH Zbphone 
secclr WITH Zsecclr 
zone WITH Zzone 


SATE NO CHANGES MADE TO MEMBERs DATA' 
7,12 SAY ' Hit SPACE BAR to EDIT moñe or to QUAN 
SET CONSOLE OFF 


SET CONSOLE ON 
ENDIE 
LOOP 


ENDDO 
LOOP o 
BOE: Seres pS 

RRR RARE RRR RA O DATADICA PRE RRE Ra % 
ADD RECORD HELP 


* 
< Author Mo Rana 
> Dace: Jal 26 

* Allows user to see data structure derrames 
e BOH adding OM Enero EEC crm a. 

WR RRR KN OW OR RK a ee de ae ee oe eee my ee oe ae ee 

SEIT TALK OFRE 

ORT tN DES ey Ore 

SE SBE bE Ore 

ERASE 


DD 
Ul 
O 


aos On 

@ say ADD REC ORD H ESEE 

> non 

INEM LaS ADS Ea 22 letters maxima 

? "RANK: Rank' . 4 letter abrev. max" 

? "SSN: Social Security number 9 dieses 

e fom: XXX-XX-XXXX' 
? "STREET: Street number & name 22 characters maximum, 
Z OREL CI sy 17 characters maximum 
ZM so mam Stare 2 letter abreviation 
2 ala. No or 9 number Z1Ip 6 or ordigi- 

2 ,HPHONE: Home telephone 14 digits maximum" | 

M none permitted 

? BPHONE: Business telehone lacune maximum’ 

a none' permitted' 

7 | ¡SECCER: (Securi uyke lea meje 12 characters max: " 

2 Top Secret, Secret, Confidential, None 
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? "ZONE: Geograph. home location 4 digit number max." 


@ 23,25 SAY 'Hit SPACE BAR to continue. ' 
SET CONSOLE OFF 


WAIT 
PET ISGONSOLE ON 
RETURN 
* EOF: DATADICI1. PRG 


RRRKKAKKERKKKKKK DATADIC2.PRG ******kkk* 


* ADD RECORD HELP 

* Author: M.W.Skahan 

* Date: JAN 86 ee 

* Allows user to see data structure definitions 
* for adding to the enlisted data 

Je to te de te eee EHH KKK RIO SLAKA AA he ie ok ak ake kk k 

SET TALK OFF 

oom INTENSITY OFF 

Soe SELL OFF 

ERASE 


O 1,26 say 'H S -  85' 
BIO 22 say 'AD PD RV EOM UD Li EV LE 
"n n 
E Billet sequence code Marcii cpi m 
Reserve billet seq. code Mmowgits" 
"NAME; bast, first, mai 22 letters maximum" 
"ARATE: Assigned rate 7 characters 
"RATE: | Actual rate "Xcharacters 
"SSN: Social Security number 9 digits 
ki form:  XXX-XX-XXXX 
"PNEC: Primary NEC 6 digits, 
"SNEC: Secondary NEC CENT LS. 
p End of current enlistment 6 digit date: 1031 
Hor OOT 3l, T3835" 
"PRD: Projected rotation date emagic date! 
"DOR: Date of rate 6 diğit data" 
,PGC: Pay grade code 2 digit num. used" 


s O ordering tor 5-9 bo E-1: " 
09 = E-9, 18 = E-8, 27 = E-7, 36 E-6, 45 = E-5," 
E Ea a 72 = E=2, 81 = £-1" 


"n "n 


PONS SAY  HIt SPACE BAR to continue.” 
ET CONSOLE OFF ' 


WAIT 
ET CONSOLE ON 
ASE 


11 1! 


h Top Secret, Secret, Confidential, None 
ZONE: Geograph. home location 4 aa gare number maximum" 


@ 23,25 SAY 'Hit SPACE BAR to continue. ' 
SET ROLE OFF 


W 
SET CONSOLE ON 
RETURN 


EOF: DATADICZ.PRG 


SII O OI es Bee ee eee II SS 
CU 


TO 


"n 


5" 


n 
S, 


,STATUS: Reserve status 6 characters: " 

"Dp TAR, NONTAR, SELRE 
i P Street n assigned to 12 characters maximum, 
"STREET: cer number & name 22 characters maximum" 
men TY: 17 characters maximum" 
„n STATE: "Étite PE ten abreviat ioni 
woo Or 9 number zip cuoc digits ” 

,HPHONE: Home telephone le digits maximum" 

j neme permi teedii 

y PPHONE: Business telehone 14 digits maximum! 
none’ permitted" 
nSECCLR: Security clearance 12 characters max: 


kkkkkkkěkkkkkkkkkkk QUIT. PRG KER KK KK RKRKKKKKEKE 


* PROGRAM TO QUIT THE DATA BASE 

* "Author. MW SKakan 

* Date: JAN 86 ; . 

* Farewell banner ur mustguctroms 

" on care of dis 

AER e O 

erase 

@ 5,5 say eon Personnel Management System" 

@ 7,5 say "When the A> shows, remove the floppy 
disks. Be careful not" 

@ 8,5 say to touch the brown part of the disk inside 
the cutout window. 

@ 9,5 say "Return the disks to their jackets. The 
information" 

@ fe za BOR the disks is subject to the Prim mej Act. 

ri, Store the them in aena file cabinets. ' 


@ say 
@ 15, 2 say ee ANY KEY >to (Wi 
set console 

wait 

set console on 

QUITE 


SOM OUITI ERG 
* END OF PERSONNEL PROGRAM *** 


2. DATA BASE ADMINISTRATOR INFORMATION 
1. Module Descriptions 
Note: Officer modules begin with "O" or end with "1". 
Enlisted modules begin with "E" or end with "2". 

1. GREET: Opening screens to identify program and its 
functions. Gets disk drive with data base. Provides Main 
Menu selection between Officer and Enlisted programs. 

called pY: TAUTOEXEC BAL 
calls: MAINI (officers) 
or MAIN2 (enlisted) 
Or QUIT (exit to DOS) 
vars: driver, loopit, enl, offr, selectnum, select 
2. MAINI: Menu screen to select Officer programs or go to 
Enlisted menu through Greeting menu. 
called by: GREET 
calls: OSENIOR (list by ranks) 
or OSECURE (security lete nej 
or ORECALL (officer recall) 
or UPDATE1 (menu for data base updates) 
Or GREET (return) 


vars: selectnum, select 
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3. MAIN2: Menu screen to select Enlisted programs or go 
to Officer menu through Greeting menu. 
called by: GKEET 
calls: EROSTER (alphabetical listing of enlisted) 
or ESENIOR (lists E-9 down to E-1) 
or ESECURE (menu for each level of security 
clearance) 
or ERECALL (recall bill) 
or MANPOWER (lists squadron by billet sequence 
code) 
or UPDATE2 (menu for data base updates) 
OL uni ( return) 
vars: selectnum, select 
ATT OSENIOR: Provides a printout of officers listed by 
rank (CDR-CWO) 
called by: MAIN] 
calls: MAIN1 (return) 
vars: answer, Zname, Zrank, Zssn, driver, 
drivefile, lname, cnt 


MAOSECURB: Provides a printout of officer security 


clearances. 
called by: MAINI 
calls: MAIN1 (return) 
vars: answer, Zname, Zrank, Zsecclr, driver, 


drivefile, lname, cnt 
6. ORECALL: Prints out officer's names, addresses, and 
phone numbers. 
called by: MAIN1 
calls: MAIN1 (return) 
vars: answer, driver, drivefile 
7. UPDATE]: Menu for adding, deleting, changing data. 
called by: MAINI1 
calls: OADD (add officers to data base) 
or ODELETE (drop officers from data base) 
or OFIXIT1 (change contents of a record) 
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ene (IDEAE (to DOS) 
Vars: selectnum, select 
8. ODELETE: -Allows deletion of an officere orme e 
base. 
called by: UPDATE1 
calls: UPDATE (return) 
vars: member, dropum, driver, drivefile, lname 
recnum, decide, all Zofficer 
9. OFIXIT1: Permits user to change individual fields 
of a selected officer's data. 
called by: UPDATE] 
calls: UPDATE] (return) 
vars: member, yesno, driver, drivefile, lname 
recnum, decide, all Zofficer 
10. OADD: Permits user to add a new officer to the data 
base. 
called by: UPDATE] 
calls: DUPDATEI (return) 
vars: addmore, yesno, driver, drivetile, loopite 
decide, addum 
ll. EROSTER: Prints alphabetical listing of enlisted 
squadron members. 
called by: MAIN2 
calls: MAINZ ( return) 
Vars: answer, driver, drivefile, lname 
12. ESENIOR: Prints sorted list of E=9) toss 
called by: MAINZ 
calls: MAINZ (return) 
vars: answer, driver, drivefile, Zpgc 


13. ESECURE: Menu to select which security clearances Co 


PRINC: 
called by: MAIN2 
calls: ESECALL (all clearances) 


or- -ESECTOP (top secret) 
Or ESECSEC (Secret) 
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or ESECCONE (confidential) 
or ESECNONE (no clearance) 
or ESECURER Her urni) 
Vars: selectnum, select 
14. ERECALL: Prints out alphabetical recall list with 
names, addresses, phone numbers, and departments. 
called by: MAINZ 
calls: MAIN2 (return) 
vars: answer, driver, drivefile, lname 
15. MANPOWER: Prints enlisted by BSC and RBSC 
called by: MAINZ 
Calls: MAIN2 (return) 
vars: answer, driver, drivefile, Zbsc 
16. UPDATE2: Menu for adding, deleting, changing data. 
called by: MAINZ 
calls: EADD (add enlisted to data base) 
or EDELETE (drop enlisted from data base) 
or EFIXIT2 (change contents of a record) 
er QUIN (to DOS) 
vars: selectnum, select 
17. ESECALL: Prints listing of all enlisted and clearances 
held. 
called by: ESECURE 
calls: ESECURE (return) 
vars: answer, driver, drivefile, lname 


E XSSECTIOPS Prints personnel holding top secret 


Clearances. 
called by: ESECURE 
calls: ESECURE (return) 
vars: answer, driver, drivefile, lname 


zname, arate, Zssn, Zsecclr 


19. ESECSEC: Prints personnel holding secret 


clearances. 
called by: ESECURE 
calls: ESECURE (return) 
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vars: answer, driver, drivefile, lname 
zname, Zrate, 4ssn, Zsecclir 
20. ESECCONE: Prints personnel holding contreien 
clearances. 
called by: ESECURE 
calls: ESECURE ( return) 
vars: answer, driver, drivefile, lname 
zname, Zrate, Zssn, Zsecclr 
21. ESECCONE: Prints personnel holding no clearance: 
called by: ESECURE 
calls: ESECURE (return) 
vars: answer, driver, drivefile, lname 
zname, Zrate, Zssn, ¿secclr 
22. EDELETE:  Allows deletion of a enlisted form the data 
base. 
called by: UPDATE2 
Calls: UPDATE2 (return) 
vars: member, dropum, driver, drivefile, lname 
recnum, decide, all Zenlisted 
23. EFIXIT2: Permits user to change individual fields 
of a selected enlisted data. 
called by: UPDATE2 
calls: UPDATE2 (return) 
Vars: member, yesno, driver, drivefile, lname 
recnum, decide, all Zenlisted 
24. EADD: Permits user to add a new enlisted to the data 
base. 
called by: UPDATE2 
calls: UPDATE2 (return) 
Vars: addmore, yesno, driver, drivefile, loopit, 
decide, addum 
25. DATADIC1: Field description for adding to officer data 
base. May be viewed at user's option. 
called by: OADD 
calls: OADD (return) 
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vars: none 
Er Mmm im DIC2: Field description for adding to enlisted 
data base. May be viewed at user's option. 

called by: EADD 

calls: EADD (return) 

vars: none 
27. QUIT: Takes user out of Personnel Management System 
and back to DOS. 

called by: GREET 


UPDATE1 
UPDATE2 
calls: DOS 
vars: none 
2. Variables 
a. ADDMORE: Used by OADD and EADD to keep adding new 
records. 
b. ADDUM: Used by OADD and EADD to hold dummy DBF during 
additions. 


c. ANSWER: Stores "P" if printout is desired in OSENIOR, 
O E CURE PORBSALL, EROSTER, ESENIOR, ERECALL, MANPOWER, 
HSECALL, BSECTOR, ESECSEC, ESECCONF, and ESECNONE. 

d. CNT: Counts to see if anyone is found in OSENIOR and 
SECURE: 

ENEPECIDE: Holds "M", "c", "D", or "P" while processing 
ESSOADDAXODELETE, EADD, and EDELETE. 

f. DRIVEFILE: Holds drive number and file being used. 

g. DRIVER: Holds the drive number of the data files. 

MW DROPUM: Used by ODELETE and EDELETE to continue 
deleting records. 

i. ENL: Used by GREET to make sure ENLISTED. DBF is 
present on disk. 

j. LNAME: Holds last name while searching in OSENIOR, 

P EC URE, ODETE, MORECALL, OFIXITl, EROSTER, ERECALL, 
ERIKXIT2, and EDELETE. 
k. LOOPIT: Used to verify response in GREET, OADD, EADD. 
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ne ee TNT TRUE 


E 


aa. 


Db: 
Gc. 
dd: 
ee. 
I. 
gg. 
hh. 


MEMBER: Used to hold name of desired person in 
ODELETE, OFIXITI, EDELETE, and EFT INCE 

OFFR: Used by GREET to make sure OFFICER. DBF is 
present on disk. 

RECNUM: Holds current record number inm ODECE TES 
OFIXITI, EDELEMRE? aAndSsHEcrr2. 

SELECT: Holds selected menu value in GREET, MAINI, 
MAINZ, UPDATEI. anadvubp imo 

SELECINUM: Holds numerical value of selected menu 
value in GREET, MAIN1, MAIN2, UPDATE1, and UPDATE2. 
YESNO: Holds "Y" or "N" choice in OADD, OFIXITIV ME nim 
and ERFIXITZ: 

ZRATE: Holds member's rate. 
ZBPHONE: Holds member's business phone. 

ZBSC: Holds member's billet sequence code. 

ZCITY: Holds member's hometown. 

ZDEPT: Holds member's assigned department. 

ZDOR: Holds member's date of rank (YYMMDD). 

ZEAOS: Holds end date of member's obligated service 
( YYMMDD). 

ZHPHONE: Holds member's home phone number. 
ZNAME: Holds member's name (last first mi). 

ZPGC: Holds member's pay grade code: 

E-9 09, E-8 los be 277 

E-6 - 36, E-5 45, E-4 = 54, 

E-3 = 63, E-2 = 72, and E-1 = 81. Used to 

sort by rate. 

ZPNEC: Holds member's primary NEC. 


ZPRD: Holds member's projected rotation date. 
ZRANK: Holds officer's rank. 

ZRATE: Holds enlisted's rate. 

ZRBSC: Holds member's reserve BSC. 

ZSECCLR: Holds member's security clearance. 
ZSNEC: Holds member's secondary NEC. 


soo 


ZSSN: Holds member's social security number. 
ZSTATE: Holds member's home state. 

ZSTATUS: Holds member's status: TAR, NONTAR, or SELRES. 
ZSTREET: Holds member's street and house number. 
ZZIP: Holds member's zip code: either 6 or 9 digit. 


ZZONE: Holds member's reserve zone (by address areas). 


S. Data Base Structures 


use e cd 
a ETS structure 
STRUC Ua EOR EILE: A: OFEICER | DBF 
NUMBER OF RECORDS: 00024 
DATE T EML LAST UPDATE: 02/26786 
PRIMARY USE DATABASE 
FL NAME 


D Or ae. OE DEC 
OOT NAME E 077 
002 RANK C 007 
003 SON E 013 
004 STREET E O22 
005 CITY 2 enm 
006 STATE C 005 
007 BET E O10 
008 HPHONE a O14 
009 BPHONE C 014 
O10 SECCER C O22 
OLI ONE C 004 
SUUS OS 
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use enlisted 
, display structure 
STRUCTURE FOR FILE: A: ENLISTED. DBF 
NUMBER OF RECORDS: 00052 
DATE OF LAST rr eae ae 


PRIMARY USE DATA 
FLD NAME E DD DEE 


O 
E 
þa 


BSC 
002 RBSC © 007 
003 NAME E 022 
004 ARATE E 007 
005 RATE el DO 
006 SSN E 013 
007 PNEC e 006 
008 SNEC E 006 
009 EAOS E 006 
O10 PRD E 006 
O11 DOR C 006 
E STATUS C 006 
013 DEPT E Op 
014 PGC E 004 
(OU STREET E 0227 
O16 (IP C 017 
(Qu STATE e 005 
O18 ZIP E OO 
019 HPHONE Cc 014 
O20 BPHONE E 014 
O21 SECCLR e 022 
0227 ZONE E 004 
** TOTAL ** 00224 
4, Indexes Used 
OFFICERS: ENLISTED: 
on name on name 


on pac rfedos 


on bsc + rbsc 


TAS 


BARREDA C 
DETAILED SCHEDULING MODEL 


This appendix provides the detailed breakdown of the 
Baca ~low Diagrams into a Structure Chart for Example l in 


mee Sizing section of Chapter IV. 


TACAMAG 
FLIGHT SCHEDULE 
PROJECT 


CREW INFORMATION APAREA INFORMATION 


OPAR£A AVAILABLE 


MEDULES 
St REDUIREMENTS 


OFFICER 


BASES IM USE 
Nerams 
BASE UPDATL 


RASE 
AVAILA BLL. 


BASE INFORMATION 
AS DEPLoveD CREW ID. 


AA Leas LEET 
ÁS INITIAL BASES id USE 


DEPLOYMENT LENGTH- 
NEXT CREW 

GPAREA Count OPDATE. 
CREWS AVAILABLE 
OPACRA COUNT 

LAST CREW/ 


NEWEST CLEN) 
COR. LocA rio 


LEG LEFT 


<EA Pp RU noO 





Hi gurne c Level O Data Flow Diagram. 
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Level 1 Data Flow Diagram 


Eigure €2 
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Level 2 Data Flow Diagram 


Eigure C.3 
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NOTE: THE SYMBOL ih 
DENOTES MODULES WHICH 
INVOKE/GET THE RANDOM 
NUMBER FUNCTION 


Figure Gli Structure Chart for Scheduling ro -m 
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